SaveDialog

[omata]

Ja? Ok, habe das zwar gerade ausprobiert und bei mir kommt keine Leerzeile. Aber wenn ihr meint...

Edit:
Wie wäre es hiermit?

Delphi-Quellcode:

SaveDialog.Filename := ChangeFileExt(SaveDialog.Filename, '.txt');
AssignFile(F, SaveDialog.Filename);
try
  Rewrite(F);
  Write(F, TrimRight(Listbox.items.text));
finally
  CloseFile(F);
end;

[ecHo89]

ich werd es mal testen ;)

1 Leerzeile...

[omata]

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.

[ecHo89]

nein, da ist definitiv keine Leerzeile :(

TrimRight hats jetzt behoben, Danke hatte erst deinen ersten Post ausprobiert. Wie kommt man auf solche Funktionen?
Bin leider seit Win7 64bit aufgeschmissen, weil meine Delphi-Hilfe nicht mehr funktioniert :(

[omata]

Hast du auch mal mein Edit aus #11 beachtet?