Einzelnen Beitrag anzeigen

MasterTobi

Registriert seit: 29. Apr 2007
212 Beiträge
 
#1

Noch ma readprozessmemory

  Alt 14. Feb 2011, 08:39
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
MFG
Tobi
  Mit Zitat antworten Zitat