Items einer FileListBox zählen???

[nils14]

Hallo@all :-D

Ich habe mal eine Frage und zwar kann man die Items eine FileListBox irgendwie zählen?
Denn Ich versuche alle Dateien in einem Ordner zu löschen. Das wollte ich dann so machen aus dem Grund das DeleteAll irgendwie nicht funktioniert. :gruebel:

Delphi-Quellcode:

var
s,n : Integer;
begin
for s := 1 to UNBEKANNT  do begin
DeleteFile(dateien.Items[n]);
n := n +1;
end;
end;

Ich wäre für Antowrten sehr dankbar!

Nils

[edit=Daniel B]Delphi-Tags eingefügt. Mfg, Daniel B[/edit]

[Daniel B]

Hi,

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(FileListBox1.Items.Count));
end;

[Christian Seehase]

Moin Nils,

und da der Index der Items bei 0 beginnt und nicht bei 1 sollte die Schleife von 0 bis FileListBox.Items.Count-1 laufen.