Delphi Programme ~ 1kb

[turboPASCAL]

Windows liefert doch schon eine Function mit, warum diese also nicht verwenden:

Code:

void FillMemory([out] PVOID Destination, [in] SIZE_T Length, [in] BYTE Fill);

Delphi-Quellcode:

procedure FillMemory(const x; Length: LongWord; Fill: Byte) stdcall;
  external kernel32 name 'RtlFillMemory';

Ich bin mir allerdings bei der Deklaration nicht 100% sicher.