Index angeblich außerhalb Wertebereich (ComboBox)

[mikhal]

i3 := Integer(ComboBox2.Items.Objects[ComboBox2.ItemIndex + 1]) - 1 setz hier doch mal ItemIndex = 1, dann steht hier aufgelöst:
i3 := Integer(ComboBox2.Items.Objects[2]) - 1 und dann ist die Fehlermeldung korrekt, weil es kein ItemIndex 2 gibt!

Grüße
Mikhal

[himitsu]

ja da gibt es nir eine kleine Unwichtigkeit ... es kann keine 2 (zu großer Index) übergeben werden.

schließlich wird (sollte) dieses, durch die knuffige IF-Abfrage davor, verhindert werden



so, ich baue grad mal alles auf "echte" Objekte um, welche ich dann statt dem "purem" Integer übergebe ... mal sehn (auch wenn dadurch der Code etwas undurchsichtiger wird)