FileListBox und ListBox Problem

[maxmax]

ahh ok, danke

kann ich das abspeichern dann so schreiben:

Delphi-Quellcode:

procedure TForm1.Listespeichern1Click(Sender: TObject);
begin
 if FileExists(FileListBox1.FileName) then
  ListBox1.Items.SaveToFile(FileListBox1.FileName)
 else
  ListBox1.Items.SaveToFile(InputBox('Neue Liste','Welchen Namen soll sie neue Liste besitzen?','Name'));
end;