oder "oldschool"
Delphi-Quellcode:
var
MyArray : array of Integer;
fd : file;
begin
// ... Setlength... Belege Array ab 1 usw..
assignfile(fd,'MeineDaten.MDD'); // MDD= MeineDatenDatei ;-)
reset(fd,1);
try
MyArray[0] := Length(MyArray);
Blockwrite(fd,MyArray[0],MyArray[0]*Sizeof(Integer));
finally
Closefile(fd);
end;
end;
Mavarik
PS.: Ich würde sagen, es gibt keinen schnelleren DelphiCode um das Array zu speichern...