Mein Problem ist, wie die Überschrift schon sagt, dass ich ein Problem beim schreiben von Text in eine Datei habe. Und zwar habe ich diesen Code:
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
var datei: textfile;
begin
assignfile(datei,'woerter.txt');
rewrite(datei);
writeln(datei,edit1.text);
closefile(datei);
end;
Mein Problem dabei ist, dass wenn ich jetzt etwas in die Datei schreibe, es immer überschrieben wird, es steht also immer nur das zu letzt geschriebene in der Datei. Ich vermute es liegt am rewrite, aber wenn ich das weg lasse, kommt ein Error. Wie kann ich es so ändern, das eine Zeile zur Datei hinzugefügt wird.