Главная страница
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.047 c
4-1118705112
Strech
2005-06-14 03:25
2005.08.14
получение Background кисти окна


1-1122092093
N!tro
2005-07-23 08:14
2005.08.14
Поиск в WebBrowser


14-1122152194
Piter
2005-07-24 00:56
2005.08.14
Увидел тут фотку...


3-1120723703
cvg
2005-07-07 12:08
2005.08.14
Подскажите новичку -- связь Delphi и MySQL


1-1122017906
stud
2005-07-22 11:38
2005.08.14
обратиться к потоку в рантайм