ListBox.itemindex und eine FOR-Schleife

[Andreas L.]

So, ich habe jetzt diesen Code:

Delphi-Quellcode:

   for i:=0 to ListBox1.ItemIndex -1 do
    begin
     Datei:=TFileStream.create(Edit3.text+(extractfilename(ListBox1.Items[i])),fmCreate);
     IdHttp1.Get(ListBox1.items[i],Datei);
     Datei.free;
    end;

Der Compiler gibt keine Meldungen mehr. Funktionieren tut das Programm aber nicht, wieso? Kann mir jemand den Code fixen?