Einzelnen Beitrag anzeigen

jus

Registriert seit: 22. Jan 2005
344 Beiträge
 
Delphi 2007 Professional
 
#5

Re: Hagens Methode eine Datei zu schützen

  Alt 26. Apr 2006, 23:49
@himitsu
Zunächst vielen vielen Dank! Leider funktioniert es nicht.
Ich versuche mit Readprocessmemory die CodeStart Stelle bis Stopcode auszulesen.
ReadProcessMemory(HandleWindow,ptr(SpeicherAdresse),buf,CodeGroesse,BytesRead); Das Problem ist nur, dass ich überhaupt nicht weiß, wie ich die Codestart Stelle als SpeicherAdresse für Readprocessmemory finden/übergeben kann.
Ich habe sogar versucht mit folgendes Adresse zu finden. Leider ohne Erfolg.
Delphi-Quellcode:
function CodeGroesse: Integer;
asm
  mov eax,offset StopMarker
  sub eax,offset Startcode;
  ret
end;

function Startmarkierung:DWORD;
asm
  MOV EAX,OFFSET Startcode
  RET
end;

procedure Speicherauslesen;
//..
begin
//..
  ReadProcessMemory(HandleWindow,ptr(Startmarkierung),buf,CodeGroesse, BytesRead);
//..
end;
jus
  Mit Zitat antworten Zitat