Zitat von
mc_flasche:
da immer steht Listenindex überschreitet das Maximum (o)
if lv_Personen.Items[i].subitems[1] = 'W' then
Inc(Weiblich);
StatusBar1.Panels[0].Text := 'Gesamt ' + inttostr(gesamt);
StatusBar1.Panels[1].Text := 'Männlich ' + inttostr(maennlich);
StatusBar1.Panels[2].Text := 'Weiblich ' + inttostr(weiblich);
Hast du denn (siehe Luckie) ein subitem 1? Denke ja weil Tabelle mit einer Spalte komisch währe ^^ (außer Testtabelle)
Und hast du auch 3 Panels erzeugt? In deiner
IDE oder zur Laufzeit?
Bei dieser Fehlermeldung kann es sich auf den ersten Blick
imho nur um diese 2 Fehlerquellen handeln.
EDIT: zu langsam ... und klein roter Kasten ^^
龍 Der Unterschied zwischen Theorie und Praxis ist in der Praxis größer als in der Theorie.