Главная страница
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.036 c
4-1119341528
Kerk
2005-06-21 12:12
2005.08.14
EM_CHARFROMPOS


1-1122270847
Korvet
2005-07-25 09:54
2005.08.14
Help!


6-1115284404
Layner
2005-05-05 13:13
2005.08.14
Господа, посоветуйте плз, как отправить 16ричный код, в TcpClient


1-1122021165
Profik
2005-07-22 12:32
2005.08.14
FastNet


14-1122279431
aliced
2005-07-25 12:17
2005.08.14
class TButton not found