Wie verhindere ich, dass TStrings.SaveToFile eine letzte leere Zeile erstellt?

Ich habe eine Datei .\input.txtwie diese: aaa bbb ccc Wenn ich es mit lese TStrings.LoadFromFileund zurückschreibe (auch ohne Änderungen vorzunehmen) TStrings.SaveToFile, wird am Ende der Ausgabedatei eine leere Zeile erstellt. var Lines : TStrings; begin Lines := TStringList.Create; try...