[scroyler]

Здравствуйте.
Подскажите пожалуйста как сделать так, у меня есть ListBox1 и ListBox2 В них абсолютно одинаковые пункты (текст 1 в 1) как сделать так что бы когда я выбираю какой ни будь пункт в ListBox1 то пункт с таким же название выбирался и в ListBox2.
Ну или же если в ListBox1 выбираю пункт1 или 2 то и в ListBox2 выбирался пункт 1 или 2.

[angvelem]

если ListBox1.Selected[i], тогда ListBox2.Selected[i] := True

[M.A.D.M.A.N.]

Можно еще ItemIndex ghjcnfdkznm/

[Ildar-tsr]

У ListBox1 (в котором будешь выбирать) во вкладке events создаешь событие onMouseDown и прописываешь:

Код:

procedure TForm1.ListBox1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  if button = mbLeft then
    ListBox2.ItemIndex:= ListBox1.ItemIndex;
end;

[Страдалецъ]

Интересно, на кой нужно на форме компонент и его клон? Почему нельзя ограничится одним основным? Или-же вопрос сформулирован не совсем верно или одно из двух.

[M.A.D.M.A.N.]

Наверное дифференс хочет сделать.