OH - halt mal die Maus über die grün unterstichenen Buchstaben << OnlineHile (das ist die in Delphi eingebaute Hilfe)
Delphi-Quellcode:
Var Datei: TextFile;
Begin
Assign(Datei, 'Datei.txt');
{$I-}
Append(Datei);
{$I+}
If IOResult <> 0 Then Reset(Datei);
WriteLn(Datei, Edit1.Text);
CloseFile(Datei);
End;
oder so:
Delphi-Quellcode:
Var SL: TStringList;
Begin
SL := TStringList.Create;
SL.LoadFromFile('Datei.txt');
SL.AddStrings(Memo1.Lines);
SL.SaveToFile('File.txt');
SL.Free;
End;
PS: du mußt natürlich immer einiges anpassen - da ja keine weiß, wie du deine Variablen/Prozeduren/Objekte ... nennst, nehmen wir natürlich "vorwiegend" Standardnamen. (z.B. Edit1, Memo1 ...)