Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Хочу использовать DbLookUpComboBox, но как? [D6, IB5.x]


off ©   (2003-05-22 07:53:00) 

Здравствуйте мастера! Возможно вопрос не совсем ДБэшный, но все же не могли бы вы мне помочь?
Я использую DbLookUpComboBox, но не совсем обычно. Т.е. мне нужен только список значений определенного поля, без всяких LookUp. Для этого соответствующие свойства DbLookUpComboBox оставляю незаполненными. Заполняю только ListSource, ListField и KeyField, причем последние два имеют одно и тоже значение. В результате DbLookUpComboBox работает как я и хотел, если бы не ...
Внимание знатоки теперь вопрос
... возникла необходимость автоматического выбора первой записи в списке DbLookUpComboBox. Как мне это сделать например при изменении списка (DbLookUpComboBox Listource OnDataChange) выбрать первую запись.


off   (2003-05-22 15:25:00) [1]

Работает, но ... только один раз :-)


Johnmen   (2003-05-22 13:04:00) [2]

>..некоторые глюки.

Какие ?


off   (2003-05-22 12:53:00) [3]

Кажется надо немного поправиться т.к. при использовании вышеописанного способа возникали некоторые глюки.
Попробовал реализовать так:
procedureTForm1.DataSource4StateChange(Sender: TObject);
begin
DBLookUpcomboBox1.KeyValue:=IBQuery1FIELD1.Value;
end;


off   (2003-05-22 08:40:00) [4]

Вопрос был весьма простой, и как всегда следующий вопрос: " И как я сразу до этого не додумался :-?"


off   (2003-05-22 08:37:00) [5]

Всем спасибо!
Реализовал через KeyField.Value следующим образом:
procedure TForm1.DataSource4DataChange(Sender: TObject; Field: TField);
begin
DBLookUpcomboBox1.KeyValue:=IBQuery1FIELD1.Value;
end;

Соответственно перед этим указав
IBQuery1.Last;
IBQuery1.First;

//Если так не делать то при DbLookUpComboBox DropDown-e вместо полноценного списка можно увидеть только одну строчку


Наверх

Титульная страница Поиск, карта сайта Написать письмо