Fehlermeldung "List Index Out Of Bounds (1)"?

[sakura]

Du musst Deine for-Schleife rückwärts durchlaufen

Code:

[color=#ff0000]for iFor := ListBox1.Items.Count -1 downto 0 do[/color]
    begin 
    if ListBox1.Items.Strings[iFor] = text then 
      ListBox1.Items.Delete(iFor); 
  end;

......