Zitat:
//c ist vom Type Cardinal.
c = FindWindow(nil,'Titel der Anwendung');
//c hat nun den Handle der Anwendung
GetWindowThreadProcessId(c, @c);
//Nun die ThreadProcessId welches für OpenProcess gebraucht wird
c = OpenProcess(PROCESS_ALL_ACCESS, False, c);
//ReadProcessMemory liest letzendlich den Inhalt der Adresse aus und speichert es in dpuffer
ReadProcessMemory(c,Pointer($0012FF60),@dpuffer,4, bytesread);
Ja ich weiß, ich habe es unschön programmiert mit "c". Aber ich habe null Bock, für alles eine neue Variable zu setzen :P