Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

DbLookupComboBox [D7, Access]

caesar © (2003-03-31 16:47:00)
Помогите! Не могу понять как в DbLookupComboBox сделать поле пустым? Cвойство Text использовать нельзя т.к. оно только для чтения а ListFieldIndex по видимому не тоже самое что и ItemIndex в ComboBox? Просто необходимо чтобы была возможность сделать поле пустым!

Соловьев (2003-04-01 12:45:00) [1]

> KeyValue:= "" , а не nil т.к. в если использовать nil то
> выдается ошибка несовместимости типов! :-)

> Johnmen © (31.03.03 16:50)

dash78 (2003-04-01 12:16:00) [2]
попробуй KeyValue:=-1
у меня прокатывает

caesar (2003-04-01 08:55:00) [3]
Огромное спасибо! Только KeyValue:= "" , а не nil т.к. в если использовать nil то выдается ошибка несовместимости типов! :-)

caesar (2003-04-01 08:50:00) [4]
Использую следующую процедуру:
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if ComboBox1.Text = "порожний" then
begin
AdoTable3.Active:= False;
end
else begin
AdoTable3.Active:= True;
end;
end;
Здесь AdoTable3 ListSource для DBLookupComboBox. Мне нужно чтобы когда я выбираю в ComboBox1 "порожний" DBLookupComboBox становилось пустым. Суйчас я просто обрубаю таблицу, но это не выход т.к. если у меня в ComboBox1 стоит "груженный" и в DBLookupComboBox я выбрал груз, то если я меняю ComboBox1 на "порожний", а потом опять на "груженный", то в DBLookupComboBox появляется то значение которое я выбрял раньше.
Хотя при перезапуске оно пустое :-)!

Жук (2003-04-01 08:42:00) [5]
Если нет источника, тогда DBLookupComboBox1.KeyValue:=nil

caesar (2003-04-01 08:38:00) [6]
Выдается ошибка Dataset not in edit or insert mode. И вообще у меня для DBLookupComboBox нет источника данных, есть только источник строк, а здесь это не одно и то же:-) Или может я не понял?

Жук (2003-04-01 08:22:00) [7]
Я вам код вырвал из свей проги. :-)
FDM - DataModule, а ListOut - TIBDataSet - источник данных для DBLookupComboBox3.

caesar (2003-04-01 08:18:00) [8]
а что такое FDM?

Жук (2003-03-31 16:52:00) [9]
procedure TFPrinc2.DBLookupComboBox3KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key=VK_DELETE then FDM.ListOut.FieldByName("id_fabrika").Clear; end;

Соловьев (2003-03-31 16:50:00) [10]
В справочной таблице добавить такое поле. Или надо NULL???

Johnmen (2003-03-31 16:50:00) [11]
KeyValue:=Null; что-то типа того...:)

Наверх

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