![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
выбор на listbox-e
Mangoost © (2005-07-27 03:09:00)например у меня на listbox ест 10 имен, хочу чтобы когда выбераю 3 ( напр имя Лаурен) то это имя проявился на Label-e,если 5 то на Label-e 5 имя
mangoost (2005-07-27 03:35:00) [1]pasiba druzya,viruchili!
Джо (2005-07-27 03:22:00) [2]Заведи процедурку синхронизации
procedure SynchronizeListAndLabel (AListBox: TListBox; ALabel: TLabel);
begin
if AListBox.ItemIndex <> -1 then
ALabel.Caption := AListBox.Items[AListBox.ItemIndex]
end;
В обработчике OnClick твоего ЛистБокса вызывай ее:
procedure TForm1.ListBox1Click(Sender: TObject);
begin
SynchronizeListAndLabel(ListBox1,Label1);
end;
ЮЮ (2005-07-27 03:22:00) [3]если Listbox.ItemIndex > -1, то содержимое берем в
Listbox.Items[Listbox.ItemIndex].
P.S. А зачем ещё и Label лепить? Может лучше TComboBox использовать? В свёрнутом состоянии компактен как Label и позволяет выбирать из спмска, как Listbox?