Forum: Object-Pascal / Delphi-Language
Delphi
by Clemens L.,
30. Jul 2009
Hab ich auch schon eingebaut, der Quelltext oben war nur der erste Versuch. Werd's trotzdem auch noch oben reinschreiben!
Forum: Object-Pascal / Delphi-Language
Delphi
by Clemens L.,
30. Jul 2009
procedure _load_decrypt;
var
p: PByte;
i: Integer;
l: Integer;
old: Cardinal;
begin
l := Integer(@_load_code_end) - Integer(@_load_code);
p := @_load_code;
Forum: Object-Pascal / Delphi-Language
Delphi
by Clemens L.,
30. Jul 2009
Hallo, :hi:
ich habe hier ein kleines Problem mit einem Stück Quellcode. Der Code soll eine andere Funktion verändern, durch Zugriff auf einen Pointer der auf ein Byte zeigt.
Das ganze sieht ungefähr so aus:
procedure DoSomething;
procedure _load_decrypt; forward;