Ja gut, warum machst du dann nicht das, was du beschrieben hast?
Du willst doch in der 2. Listbox das Item mit demselben
ItemIndex wie das markierte in der ersten auswählen. Du fragst jetzt aber in deinem Code ab, ob in ListBox 2 der (sagen wir mal, du hast in ListBox1 nur 1 Eintrag ausgewählt) 1. Eintrag ausgewählt ist. Bzw eigentlich fragst du nich mal ab. Falls du in ListBox2 nichts markiert hast, steht da bei dir sozusagen einfach nur
false.
Was du machen mußt ist, den ItemIndex zu setzen. Also so:
Delphi-Quellcode:
If ListBox1.ItemIndex > -1 Then
ListBox2.ItemIndex[ListBox1.ItemIndex];
Weiß jetzt nicht, wie das bei dir geregelt ist, aber du solltest dann noch evtl abfragen, ob in der 2. Listbox auch genug Items drin sin. Wenn das allerdings immer genau gleichviele sind, kannst du gut drauf verzichten.