Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.08.14;
Скачать: CL | DM;

Вниз

выбор на listbox-e   Найти похожие ветки 

 
Mangoost   (2005-07-27 03:09) [0]

например у меня на listbox ест 10 имен, хочу чтобы когда выбераю 3 ( напр имя Лаурен) то это имя проявился на Label-e,если 5 то на Label-e 5 имя


 
Джо ©   (2005-07-27 03:22) [1]

Заведи процедурку синхронизации

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) [2]

если Listbox.ItemIndex > -1, то содержимое берем в  
Listbox.Items[Listbox.ItemIndex].

P.S. А зачем ещё и  Label лепить? Может лучше TComboBox использовать? В свёрнутом состоянии компактен как Label и позволяет выбирать из спмска, как Listbox?


 
mangoost   (2005-07-27 03:35) [3]

pasiba druzya,viruchili!



Страницы: 1 вся ветка

Текущий архив: 2005.08.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.026 c
3-1120805389
dreamse
2005-07-08 10:49
2005.08.14
Проблема в добавлении записи через хранимую процедуру


1-1122470768
Juice
2005-07-27 17:26
2005.08.14
Директива-аналог "stop on delphi exceptions"


14-1121945543
Opilki_Inside
2005-07-21 15:32
2005.08.14
Есть такой славный текстовый редактор ViM называется.


8-1112975467
dimon__
2005-04-08 19:51
2005.08.14
SampleGrabber не работает


3-1120734847
Ирина
2005-07-07 15:14
2005.08.14
ADOTable