ListView - Listenindex überschreitet Maximum(0)

[citybreaker]

Hallo,
ich hab ein Listview mit ein paar Werten drinne. Wenn ich diese in einer anderen Form in Editfelder anzeigen
lassen möchte bekomme ich aufeinmal einen Fehler den ich gestern nicht bekommen habe. Das wundersame dabei ist,
dass ich nichts geändert habe.

Wenn ich mir mit ListView.Items.Count die maximalen Items anzeigen lasse komme ich auf 53 Items.

Delphi-Quellcode:

      AnlagenFrm.Label1.Caption := ListView2.Items.Item[0].SubItems.Strings[0];
      AnlagenFrm.Edit1.Text := ListView2.Items.Item[1].SubItems.Strings[0];
      AnlagenFrm.Edit2.Text := ListView2.Items.Item[2].SubItems.Strings[0];
      AnlagenFrm.Edit3.Text := ListView2.Items.Item[3].SubItems.Strings[0];
      AnlagenFrm.Edit4.Text := ListView2.Items.Item[4].SubItems.Strings[0];
      AnlagenFrm.Edit5.Text := ListView2.Items.Item[5].SubItems.Strings[0];
      AnlagenFrm.Edit6.Text := ListView2.Items.Item[6].SubItems.Strings[0];
      AnlagenFrm.Edit7.Text := ListView2.Items.Item[7].SubItems.Strings[0]; // Ab hier kommt der Fehler
      // das ganze geht so weiter bis ListView2.Items.Item[52]
      // ...

      AnlagenFrm.ShowModal;

Ich habe die Zeilen nach einander in einen Kommentar umgewandelt um zu sehen ab wo der Fehler auftaucht.
Ab dem Item[8] kommt dann der Fehler. Ich kann mir einfach nicht erklären warum das auf einmal passiert.

[mkinzler]

Existieren auch SubItems zu diesem Item?

[patti]

Leicht OT: Wie wäre es mit einer Schleife? ;)

[citybreaker]

Ja, ich habe zwei Spalten in der ListView. Bis zum Item 7 funktioniert das auch tadellos.

Schleife hatte ich auch überlegt, habe aber Teilweise auch 2 Comboboxen und eine Memo eingebaut.

[Uwe Raabe]

Ich behaupte mal, wenn bei

Delphi-Quellcode:

AnlagenFrm.Edit7.Text := ListView2.Items.Item[7].SubItems.Strings[0]; // Ab hier kommt der Fehler

ein "ListView - Listenindex überschreitet Maximum(0)" kommt, dann ist mit ziemlicher Sicherheit

Delphi-Quellcode:

ListView2.Items.Item[7].SubItems.Count = 0

Ohne weitere Informationen kann man allerdings nur wenig mehr dazu sagen.

[citybreaker]

Hab den Fehler gefunden. Anscheinent mag Delphi es nicht wenn in dem SubItem nichts drinne steht. Wenn ich alles nichts drinne steht mit dem Wort NULL ersetzte, dann kommt der Fehler nicht mehr.

[jaenicke]

Naja, wenn du auf den ersten Eintrag einer Liste zugreifst, dann muss der auch existieren, ja.

Du kannst aber auch einen leeren String einfügen. Wichtig ist nur, dass in der Liste so viele Items drin sind wie du beim Auslesen erwartest.

[mkinzler]

Oder man fragt dies vorher ab oder packt den Code in try..except