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

Вниз

Хочу использовать DbLookUpComboBox, но как?   Найти похожие ветки 

 
off ©   (2003-05-22 07:53) [0]

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


 
off ©   (2003-05-22 08:37) [1]

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

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

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


 
off ©   (2003-05-22 08:40) [2]

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


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

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


 
Johnmen ©   (2003-05-22 13:04) [4]

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

Какие ?


 
off ©   (2003-05-22 15:25) [5]

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



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
7-35081
Dimaz-z
2003-04-07 22:32
2003.06.12
Помогите! Как позвонить?...


14-35019
sizmrebi
2003-05-26 14:26
2003.06.12
Reports in Delphi 7


1-34874
Seldon
2003-05-31 16:16
2003.06.12
Передача данных


14-34981
Дмитрий К.К.
2003-05-29 06:59
2003.06.12
Именинники 29 мая


1-34896
Лесник
2003-05-31 23:49
2003.06.12
Счетчик