Hallo!

Ich bin gerade dabei ein Programm zu programmieren, was eingegebene Editfelder an DAS ENDE einer .cfg-Datei speichern soll.

So sieht es zurzeit aus:

Memo1.SelectAll;
Memo1.copytoclipboard;
Memo1.Lines.SaveToFile('C:\user.cfg');

Das Problem ist nur, dass die Datei immer wieder überspeichert ist, und der Code nicht in eine neue Zeile schreibt. Wie kann das funktionieren?
Danke für jeden Tipp

adrinator

Ps.: Gegoogled hab ich schon, find nur iwie nix genaues dazu...

"überspeichert"? Was soll das heißen? Meinst du überschreiben? Wenn der Inhalt erhalten bleiben soll, musst du ihn natürlich vorher sichern oder die neuen zeilen mit Lines.Add hinzufügen.

aber hast du dir schon mal überlegt, was du da eigentlich machst?

markieren

Delphi-Quellcode:

Memo1.SelectAll;
Memo1.copytoclipboard;
Memo1.Lines.SaveToFile('C:\user.cfg');

Du wählst alles aus im Memo, dann kopierst du es in die Zwischenablage und dann speicherst du den Inhalt des Memos. Und was steht da dann drin?

Vielleicht so ?

markieren

Delphi-Quellcode:

var
  f: TextFile;

begin

  AssignFile(f, 'C:\user.cfg');
  Append(f);
  WriteLn(f, Memo1.Text);
  CloseFile(f);

Danke hat funktioniert!