Hi Volker,
das geht in dem Fall leider nicht...denke ich jedenfalls. Denn aus der einen Textdatei werden mehrere EditFelder und Memofelder "bestückt".
Was ich pepostet hatte war nur ein Ausschnitt. Das Ganze sieht so aus:
Delphi-Quellcode:
procedure TForm1.Speichern1Click(Sender: TObject);
var
Datei: TextFile;
begin
if SaveDialog1.Execute
then
AssignFile(Datei, SaveDialog1.FileName);
Rewrite(Datei);
WriteLn(Datei, EditName.Text);
WriteLn(Datei,EditEmail.Text);
WriteLn(Datei,EditPassword.Text);
WriteLn(Datei,EditTelefon.Text);
WriteLn(Datei,EditUeberschrift.Text);
WriteLn(Datei,EditBeschreibung.Text);
WriteLn(Datei,EditAnmerkungen.Text);
WriteLn(Datei,MemoAdresse.Text);
CloseFile(Datei);
end;
Ich habe mir jetzt vorübergehend damit beholfen, für jedes Momofeld einen eigenen Speicherknopf anzulegen. Aber das ist nicht gerade elegant und nimmt viel Platz weg.