FileDeleter Problem

[Van HelF]

oder mit ner listbox:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
var i:Integer; 
begin 
for i := 0 to ListBox1.Items.Count - 1 do 
begin 
  DeleteFile(ListBox1.Items.strings[i]); <- lugg da 
end; 
end;