|
#1
|
|||
|
|||
2 listbox
Добрый день, на форме есть 2 listbox, в каждом есть разные строчки.
Как сделать так, чтобы при нажатии мышкой допустим на 11 строчку первого listbox, вывести сообщение с содержимым 11 строчки но второго listbox? |
#2
|
|||
|
|||
Ну, например, как то так:
Код:
procedure TForm1.ListBox1Click(Sender : TObject); begin If ListBox1.ItemIndex > -1 Then ShowMessage(ListBox2.Items[ListBox1.ItemIndex]) end; |