WriteProcessMemory schreibt nicht :(

[T3rm1n4T0r]

Hi,
ich verwende ich meinem aktuellen Programm WriteProcessMemory. Nur leider funktioniert dies nicht. Es wird einfach nichts geschrieben. Die Anzahl der geschriebenen Bytes ist 0 und auch der Wert (wenn ich ihn danach mit ReadProcessMemory lese) derselbe.
Hier mal mein Source

Vielleicht weiß ja jemand was da los ist.

Gruß T3rm1

[Basilikum]

vermutlich ist der Memory-Bereich Read-Only...
siehe VirtualProtectEx

[T3rm1n4T0r]

Könnte sein. Wie kann ich denn die Rechte ändern?
Hab das so probiert:
tmp := VirtualProtectEx(pi.hProcess,Ptr(baseaddress),1,PAGE_EXECUTE_READWRITE,ptr(oldaccess)); Aber die Funktion schlägt immer fehl. Oldaccess ist dabei ein cardinal.

Edit: Hab jetzt mal versucht bei irgendeinem Programm, dass ich mal erstellt habe im Speicher zu schreiben und auch da funktioniert es nicht.
Es muss also an irgendwas anderem liegen :/

[Basilikum]

vermutlich liegt es am Ptr vor baseaddress... das API erwartet dort die Adresse in Form eines Pointers, nicht einen Pointer auf die Adresse..... versuchs mal mit Pointer(baseaddress).... dasselbe übrigens auch bei den Aufrufen von WriteProcessMemory.....

[T3rm1n4T0r]

oO
ptr = pointer
Außerdem kann ich damit genau den Wert auslesen der da steht. Nur nicht schreiben.

[Basilikum]

Zitat von T3rm1n4T0r:

oO
ptr = pointer
Außerdem kann ich damit genau den Wert auslesen der da steht. Nur nicht schreiben.

oke... möglich... ich hatte hier noch die Function Ptr() aus Turbo Pascal im Kopf, die die Adresse der Variable zurückgegeben hat (was in diesem Fall ja nicht erwünscht wäre)...

führe mal nach dem WriteProcessMemory ein RaiseLastOSError() aus... welcher Fehler tritt auf ?

[brechi]

Der Fehler ist, dass du ein

@origByte brauchst und kein ptr(origByte)

[T3rm1n4T0r]

Ok, geht, danke!

[jbg]

Zitat von Basilikum:

ich hatte hier noch die Function Ptr() aus Turbo Pascal im Kopf, die die Adresse der Variable zurückgegeben hat

Nur liefert Ptr nicht die Adresse der Variable in TurboPascal, sondern konstruiert einen Zeiger aus Segment und Offset: Ptr(Seg, Offset). Die Addr(variable/proc) Funktion, die es auch noch unter Delphi gibt, liefer genau wie @variable/proc die Adresse.