Thema: Delphi Speicherzugriff

Einzelnen Beitrag anzeigen

Benutzerbild von XXcD
XXcD

Registriert seit: 19. Sep 2006
581 Beiträge
 
Delphi 2007 Professional
 
#1

Speicherzugriff

  Alt 4. Apr 2008, 23:57
Hallo,
ich bastel mir gerade ein Programm zusammen um auf meine G15 Tastatur Daten von einem Spiel ausgeben zu lassen.

Mit der Suchfunktion bin ich auf folgendes gestoßen:
Delphi-Quellcode:
procedure TForm6.Button4Click(Sender: TObject);
var
  WindowHandle: Integer;
  Pidi: Integer;
  Read:DWORD ;
  Processhandle: THandle;
  lBuf: integer;
   Wert:DWORD ;
begin
  WindowHandle :=FindWindow(nil,'Fentsertitel');
  if Windowhandle=0 then raise Exception.create('Fenster nicht gefunden');
  GetWindowThreadProcessId(WindowHandle ,@Pidi);
  ProcessHandle :=OpenProcess(PROCESS_VM_READ ,False , pidi);
  if ProcessHandle=0 then raise Exception.create('Kein Zugriff auf Process');
  try
   ReadProcessMemory(Processhandle ,ptr($00400000),@lBuf,4,Wert);
    Edit2.Text :=IntToStr(lbuf);
  finally
    CloseHandle(Processhandle);
  end;
end;
Die Adresse wird so angegeben: $00400000
Die Adresse, die ich habe sieht so aus: 0x00cf097c

Wie kann ich die Adresse benutzen?
  Mit Zitat antworten Zitat