Ein Hallöle von
http://www.FrankNStein.de/Smiley-Wolke.gif,
das ist normal, StringList macht an jedes Zeilenende, also auch an das Letzte immer einen Zeilenwechsel (#13#10/CRLF).
Wenn du das nicht wills, mußt du eben Selber speichern.
Delphi-Quellcode:
Var S: String;
F: TextFile;
S := Copy(StringList.Text, 1, Length(StringList.Text) - 2);
AssignFile(F, 'Da.tei');
Rewrite(F);
Write(F, S);
CloseFile(F);
(nicht getestet, dürfte aber geh'n)
[add]
Oder so (falls z.B. mehrere leere Zeilen am Ende sind):
Delphi-Quellcode:
Var S: String;
F: TextFile;
S := StringList.Text;
While (S[Length(S)] = #13) or (S[Length(S)] = #10) do
Delete(S, Length(S), 1);
AssignFile(F, 'Da.tei');
Rewrite(F);
Write(F, S);
CloseFile(F);
http://www.FrankNStein.de/Smiley-Kuss.gif * *
http://www.FrankNStein.de/Smiley-Spinne.gif * * *
http://www.FrankNStein.de/Smiley-Winken.gif