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

Вниз

Вытащить инфу из RT компонентов   Найти похожие ветки 

 
SCH   (2004-05-17 14:45) [0]

Созданы в RunTime несколько ComboBox. Как по их индексу узнать в каком комбо, какая строка выбрана.
Заранее благодарен.


 
PVOzerski ©   (2004-05-17 14:54) [1]

А что такое индекс ComboBox"а?


 
Skier ©   (2004-05-17 14:55) [2]

Owner.Components[...]
TComboBox.ComponentIndex
TComboBox.ItemIndex
?


 
PVOzerski ©   (2004-05-17 15:02) [3]

А что такое индекс ComboBox"а?


 
Polevi ©   (2004-05-17 15:11) [4]

procedure TForm1.FormCreate(Sender: TObject);
begin
 with TCombobox.Create(self) do
 begin
   Parent:=self;
   Name:="Combo1";
   OnChange:=ComboBoxOnChange;
   Top:=0;
   Items.Add("One");
   Items.Add("Two");
 end;
 with TCombobox.Create(self) do
 begin
   Parent:=self;
   Name:="Combo2";
   OnChange:=ComboBoxOnChange;
   Top:=20;
   Items.Add("One");
   Items.Add("Two");
 end;
end;

procedure TForm1.ComboBoxOnChange(Sender: TObject);
var
 cb:TCombobox;
begin
 cb:=TComboBox(Sender);
 ShowMessage(Format("%s - %s",[cb.Name,cb.Items[cb.ItemIndex]]));
end;


 
WebErr ©   (2004-05-17 15:16) [5]

В конце концов можно самому придумывать индексы TComboBox"ов просто присваивая свойству Tag новое значение. :)



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

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

Наверх




Память: 0.47 MB
Время: 0.053 c
1-1085035121
Sandman25
2004-05-20 10:38
2004.05.30
procedure of class?


6-1081330444
pohil
2004-04-07 13:34
2004.05.30
Чат на Indy


14-1083896805
X9
2004-05-07 06:26
2004.05.30
Чат на Delphi


7-1083217362
TumoxA
2004-04-29 09:42
2004.05.30
Запуск и завершение приложений


1-1084739094
Liona
2004-05-17 00:24
2004.05.30
Как очистить StringGrid?