Forum: Object-Pascal / Delphi-Language
Delphi
by omata,
12. Jan 2010
Hast du auch mal mein Edit aus #11 beachtet?
Forum: Object-Pascal / Delphi-Language
Delphi
by omata,
12. Jan 2010
Hast du zufällig in deinen Lines von der ListBox eine Leerzeile am Ende? Ich habe da nämlich keine und erhalte so auch keine.
Forum: Object-Pascal / Delphi-Language
Delphi
by omata,
12. Jan 2010
Ja? Ok, habe das zwar gerade ausprobiert und bei mir kommt keine Leerzeile. Aber wenn ihr meint...
Edit:
Wie wäre es hiermit?
SaveDialog.Filename := ChangeFileExt(SaveDialog.Filename, '.txt');
AssignFile(F, SaveDialog.Filename);
try
Rewrite(F);
Write(F, TrimRight(Listbox.items.text));
Forum: Object-Pascal / Delphi-Language
Delphi
by omata,
12. Jan 2010
Was spricht gegen folgendes?
SaveDialog.Filename := ChangeFileExt(SaveDialog.Filename, '.txt');
AssignFile(F, SaveDialog.Filename);
try
Rewrite(F);
Write(F, Listbox.items.text);
finally
CloseFile(F);
end;