помогите в Delphi 7

Подскажите пожалуйста как сделать чтобы в пременую заносилась строка (ту на которую я нажал) (line) или номер етой строки из list box

на событие OnClick

str := ListBox1.Items[ListBox1.ItemIndex]; //строка
num := ListBox1.ItemIndex; // номер

[b]Лесли[/b], угу. Еще неплохо бы проверить ItemIndex на >=0.

[b]U391[/b], ну ей богу, хелпы для кого пишут?

C пасибо вам большое!

[quote=Slaventius] Еще неплохо бы проверить ItemIndex на >=0.
[/quote]
А зачем? Разве OnClick может наступить, если ItemIndex отрицательный?

[b]Лесли[/b], у листбокса нет. а у комбобокса такое может быть запросто.

Да какая уже разница - удовлетворили человека - и все...