Problem Memo1.lines.savetofile()

[alzaimar]

Schau dir die Memo.Lines genau an. wo steht der Cursor? am Anfang der letzten Zeile? Dann ist die letzte Zeile leer. Und das wird gespeichert. Wenn Du dass nicht willst, dann lösche die letzte Zeile, z.B. mit:

Delphi-Quellcode:

With Memo1, Lines Do
  If Count > 0 Then
     If Lines(Count - 1] = '' Then 
       Count := Count - 1;