Einzelnen Beitrag anzeigen

Benutzerbild von Muellermilchtrinker
Muellermilchtrinker

Registriert seit: 1. Aug 2009
447 Beiträge
 
Delphi 2009 Professional
 
#9

Re: Speicheradresse (immer gleich) auslesen

  Alt 24. Nov 2009, 19:59
Habs jetzt so gemacht:
Delphi-Quellcode:
var
  lBuf: PChar;
  lRead,c : Cardinal;
begin
  c:=FindWindow(nil,'sag ich net'); //Get WindowHandle
  if c=0 then
  begin
    MessageDlg('...erst spiel starten...dann trainer starten =)',mtwarning,[mbOK],0);
    Exit;
  end;
  GetWindowThreadProcessId(c,@c); //Get ProcessID and ignore ThreadID
  c:=OpenProcess(PROCESS_ALL_ACCESS,False,c); //Get ProcessHandle
  ReadProcessMemory(c,Ptr($599CD8),lBuf,1,lRead);
  Edit1.Text := lBuf;
  CloseHandle(c);
Nur bekomm ich in Edit1.Text unverständliche Zeichen.
Chuck Norris doesn't need backups. He just uploads his files and lets the world mirror them.
  Mit Zitat antworten Zitat