Listenindex überschreitet das Maximum (9).

[Stevie]

Zitat von dizzy:

... isch hatte mich vertan - sorry

Na gut!!!

Delphi-Quellcode:

i := 0; 
while i <  ListBox1.Items.Count do 
  if ListBox1.Items[i] = schueler.Text then 
    ListBox1.Items.Delete(i) 
  else 
    Inc(i);

dürfte übrigens für große Texte schneller sein, als

Delphi-Quellcode:

with ListBox1.Items do
  Delete(IndexOf(schuler.text));

weil, IndexOf immer wieder vom Anfang an durchsucht.
Aber das nur so nebenbei...