FileDeleter Problem

[mOzZzI]

Delphi-Quellcode:

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

Warum deleted er die Files nicht? Wo ist da der Fehler?