Alle Record-Einträge löschen

[BrunoT]

Hi,

Hier ein Beispiel wie man so etwas schnell erledigt:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
Type
  b=record
   a:integer;
   b:string;
end;

var
  S: array[0..79] of b;
begin
  { Mit #0 füllen }
  FillChar(S, SizeOf(S), #0);
end;

mfg

BrunoT