![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Хочу использовать 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 вместо полноценного списка можно увидеть только одну строчку