Funktion überschreiben

[Cyf]

Wie ist es möglich den Inhalt einer Funktion zu überschreiben?
Sowohl ein Versuch via

Delphi-Quellcode:

PByte(@Funktionsname)^:= EIN_WERT;

führt zu einer EAccessViolation, als auch das Überschreiben durch WriteProcessMemory nach

Delphi-Quellcode:

OpenProcess(PROCESS_ALL_ACCESS, FALSE, GetCurrentProcessId());

scheitert (ERROR_NOACCESS
998 (0x3E6), Invalid access to memory location.), obwohl sich andere Speicherwerte (globale Variablen etwa) ändern lassen. Hierbei scheint es keine Rolle zu spielen, ob der Prozess mit oder ohne Admin-Rechte gestartet wurde.

[oki]

vielleicht versteh ich dich nicht richtig, aber das tut man doch ständig im Bereich Vererbung einerseits oder bei der Zuweisung von Ereignisproceduren. Beide müssen nur gleichlautend definiert sein.
Ich denk mal, du meinst etwas anderes. Vielleicht kannst du noch mal genauer sagen, was du machen willst.

Gruß oki

[Die Muhkuh]

Es scheint, es wolle an die Adresse der Funktion was anderes hinschreiben.

[Cyf]

Zitat:

Zitat von Die Muhkuh

Es scheint, es wolle an die Adresse der Funktion was anderes hinschreiben.

Ja. :)

[oki]

Was ist der Sinn dahinter?

[ErazerZ]

Wahrscheinlich rechte setzen vergessen. Versuchs mal mit VirtualProtect zuerst aufrufen und danach überschreiben.