Problem mit StringList

[rantanplan99]

Zitat:

Delphi-Quellcode:

   for i:=0 to ListBox1.ItemIndex-1 do
    begin
     sl.Add('case "'+ ListBox1.Items.Strings[i] +'": header(Location: '+ ListBox2.Items.Strings[i] +'"); break;');
    end;

probiers mal mit

Delphi-Quellcode:

   for i:=0 to ListBox1.Count-1 do
    begin
     sl.Add('case "'+ ListBox1.Items.Strings[i] +'": header(Location: '+ ListBox2.Items.Strings[i] +'"); break;');
    end;

Itemindex liefert ja nur den Index des selektierten Items zurück und ich nehme an du meinst .count