Einzelnen Beitrag anzeigen

Benutzerbild von ErazerZ
ErazerZ

Registriert seit: 27. Mai 2005
Ort: Baden
315 Beiträge
 
Delphi 2007 Enterprise
 
#7

Re: EXE Patchen -- Error: verletzt untere Grenzen

  Alt 31. Dez 2007, 22:15
Hier noch was ganz schnell bevor ich gehe,
Delphi-Quellcode:
procedure UpdateOffset(var lpBuffer: Pointer; dwFileOffset: Cardinal; Value: array of Byte); overload;
begin
  CopyMemory(Pointer(Cardinal(lpBuffer) + dwFileOffset), @Value[0], SizeOf(Value));
end;


...
const
  x: Array[0..7] of Byte = ($01, $00, $00, $4B, $21, $24, $05, $C6);
begin
  ..
    UpdateOffset(lpBuffer, dwFileOffset, x);
  ..
end;
Guten Rutsch noch .
  Mit Zitat antworten Zitat