Eine Art Tabelle mit Check- & Listbox

**Money Making Machinist**

Hi,

ich möchte eine Tabelle mit Checklistbox und Listbox machen (links Check, rechts List).
Und wenn man den eine Eintrag anklickt (also blau macht) soll in der anderen Box der Eintrag auf der selben Höhe auch blau werden.
Aber was ich auch versuch, ichs kriegs a) nicht hin und b)mit Fehlermeldung.

markieren

Delphi-Quellcode:

			procedure TForm1.CheckListBox1Click(Sender: TObject);

var i : integer;

begin

if (checklistbox1.Selected[1] = true) then listbox1.Selected[1]:= true;

end;

Fehlermeldung ist dann: Der Index der Liste überschreitet das Maximum(1).

Hatte gehofft ihr könntet mir dabei weiterhelfen.

Eine Art Tabelle mit Check- & Listbox

Eine Art Tabelle mit Check- & Listbox

Forumregeln