FileDeleter Problem

[100nF]

probier mal das:

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;