oder mit Delphi-Boardmitteln: die komplette Form auf einmal speichern. Das Laden ist Hausaufgabe
Delphi-Quellcode:
var
BinStream: TMemoryStream;
StrStream: TStringStream;
begin
BinStream := TMemoryStream.Create;
try
StrStream := TStringStream.Create('');
try
BinStream.WriteComponent(Form1);
BinStream.Seek(0, soFromBeginning);
ObjectBinaryToText(BinStream, StrStream);
StrStream.Seek(0, soFromBeginning);
StrStream.SaveToFile('d:\temp\text.txt');
finally
StrStream.Free;
end;
finally
BinStream.Free
end;
end;