FileDeleter Problem

[100nF]

hast du schon meinen code probiert?
ich würde meinen, dieser müsste funktionieren.

hier ist er nochmal:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
var i:Integer; 
begin 
  for i := 0 to ListView1.Items.Count - 1 do 
  begin 
    DeleteFile(ListView1.Items.item[i].subitems[1]); 
  end; 
end;

oder:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
var i:Integer; 
begin 
  for i := 0 to ListView1.Items.Count - 1 do 
  begin 
    DeleteFile(ListView1.Items.item[i].subitems[1]+Listview1.items.item[i].caption); 
  end; 
end;