Noch ma readprozessmemory

[MasterTobi]

Hallo,
ich hab jetzt mal 3 tage die ganze delphicomm durchsucht, aber das richtige ergebniss nicht gefunden.

ich hab da ein problem ^^, btw in einem anderen tread hab ich auch schonmal so eiine frage gestellt die bezieht sich auch fasst auf das gleiche nur etwas anders.
ok das habe ich an infos

0xB6F5F0 - Player pointer (CPed)

Cped +0x46C = [byte] Player check:
0 = in air/water
1 = in car
2 = entering interior
3 = on foot

so ich hab nun mir ma folgenden code zsmgebastelt

Delphi-Quellcode:

var
  WindowName: Integer;
  Pidi: Integer;
  Wert:DWORD  ;
  Window1: Integer;
  Buf: integer;
begin

WindowName :=FindWindow(nil,'GTA:SA:MP');
GetWindowThreadProcessId(WindowName ,@pidi);
Window1 :=OpenProcess(PROCESS_VM_READ ,False , pidi);
ReadProcessMemory(Window1 ,ptr($B6F5F0 ),@Buf,sizeof(integer),Wert);
ReadProcessMemory(Window1 ,ptr(buf+$46c),@Buf,sizeof(integer),Wert);
label5.caption:=inttostr(Buf);


CloseHandle(Window1);

das prob is das irgendwas ausgegben wird, nur nicht 0,1,2,3

auch Buf := byte funktioniert nicht

weiß jemand rat

[himitsu]

Nahezu alle APIs in diesem Code haben Rückgabewerte ... wie wäre es mal, wenn die ausgewertet werden?

Und selbst wenn der Code dennoch funktioniert, können wir dir nicht helfen, falls die gewünschten Werte garnicht an diesem Ort liegen, wo du sie suchst.

[MasterTobi]

hm auswerten ?
also er findet das fenster und den prozess öffnet ihn auch.

und warum sollte das nicht funktionieren,
http://www.gtamodding.com/index.php?...(SA)#Interface
gibt se mir doch vor

mfg