Laufendes Programm Speichern (savetofile)

[Teekeks]

Und wie ist es mit:

Delphi-Quellcode:

var spst:tspielstand;
    spstdt:file of tspielstand;
begin
  assignfile(spstdt,{pfad});
  rewrite(spstdt);
  writeln(spstdt,spst);
  closefile(spstdt);
end;

Das speichert das ganze in einer Binären Datei ab.

gruß Teekeks