Listbox zu listbox selektieren

Tach,
ich bins mal wieder. Also ich habe 2 Listboxen und wenn in der ersten ein Item markiere soll in der zweiten Listbox ein item mit den selben itemindex markiert werden. Ich habe folgenden Code aber des funktioniert nicht, wahrscheinlich habe ich nur nen kleinen Denkfehler aber ich komm net drauf.

markieren

Delphi-Quellcode:

			procedure TForm1.ListBox1Click(Sender: TObject);

begin

 //select a item in listbox2

 if ListBox1.SelCount > 0 then

  begin

   ListBox2.Selected[ListBox1.selcount];

  end;

end;

Danke schonmal

Listbox zu listbox selektieren

Listbox zu listbox selektieren

Forumregeln