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

Вниз

Выпадающий список.   Найти похожие ветки 

 
Vinni   (2003-08-16 08:27) [0]

Мне нужно сделать так что-бы в выпадающем списке(типа TComboBox) отображалось поле таблицы, скажем "Фамилия". Подскажите как это реализовать. Пробовал TDBComboBox, но он отображает только первую запись.


 
Evgeny V ©   (2003-08-16 08:33) [1]

А Items ты у него(TDBComboBox) заполнил? И Style выбери нужный, например csDropDownList или csDropDown


 
SkyN ©   (2003-08-16 09:37) [2]

я сделал так:

procedure TForm1.ComboBox1DropDown(Sender: TObject);
// это событие onDropDown
begin
ADOQuery1.SQL.Text := "select NAME_USER from _partner(nolock) Order by 1";
ADOQuery1.Active := true;
ADOQuery1.First;
ComboBox1.Items.BeginUpdate;
ComboBox1.Items.Clear;
ComboBox1.Items.Add("не определено");
While not ADOQuery1.EOF do begin
ComboBox1.Items.Add(DataModule1.ADOQuery1.Fields[0].Text);
ADOQuery1.Next;
end;
ADOQuery1.Active := false;
ComboBox1.Items.EndUpdate;
end;


 
Desdechado ©   (2003-08-17 16:09) [3]

я не понял - нужно имена полей отображать в combo или содержимое одного поля?
если имена полей, используй обычный ComboBox - просто добавь в него эти имена.
если содержимое поля, то DBComboBox, но тогда сделай в своей таблице Last - это приведет к прочитыванию всего списка и в combo он будет виден


 
Соловьев ©   (2003-08-18 09:58) [4]


> SkyN © (16.08.03 09:37) [2]

не рационально. я бы повесил, на событие когда идут изменения справочной таблицы.


> Desdechado © (17.08.03 16:09) [3]

и еще First не забыть. но можно и FeatchAll сделать.


 
Vlad   (2003-08-18 13:28) [5]

Лучше использовать TDBCombobox
А в ADOQuery попробуй CacheSize поставить 10 напр.
Тогда DropDownList должон нормальным стать.



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

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

Наверх




Память: 0.47 MB
Время: 0.024 c
14-24641
JohnJ
2003-08-21 02:02
2003.09.08
Кладовка


14-24648
Ev_genus
2003-08-21 00:56
2003.09.08
Конкурс: Кто знает больше скриптовых движков?


1-24448
Shadow[AN]
2003-08-25 16:25
2003.09.08
Отображение unicode в Delphi (конкретно- иврит)


3-24341
изм
2003-08-18 10:08
2003.09.08
изменентие TField


1-24535
VISA
2003-08-26 13:00
2003.09.08
Запрет максимизации окна...