Форум: "Базы";
Текущий архив: 2003.04.17;
Скачать: [xml.tar.bz2];
ВнизDbLookupComboBox Найти похожие ветки
← →
caesar (2003-03-31 16:47) [0]Помогите! Не могу понять как в DbLookupComboBox сделать поле пустым? Cвойство Text использовать нельзя т.к. оно только для чтения а ListFieldIndex по видимому не тоже самое что и ItemIndex в ComboBox? Просто необходимо чтобы была возможность сделать поле пустым!
← →
Соловьев (2003-03-31 16:50) [1]В справочной таблице добавить такое поле. Или надо NULL???
← →
Johnmen (2003-03-31 16:50) [2]KeyValue:=Null; что-то типа того...:)
← →
Жук (2003-03-31 16:52) [3]
procedure TFPrinc2.DBLookupComboBox3KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if Key=VK_DELETE then FDM.ListOut.FieldByName("id_fabrika").Clear;
end;
← →
caesar (2003-04-01 08:18) [4]а что такое FDM?
← →
Жук (2003-04-01 08:22) [5]Я вам код вырвал из свей проги. :-)
FDM - DataModule, а ListOut - TIBDataSet - источник данных для DBLookupComboBox3.
← →
caesar (2003-04-01 08:38) [6]Выдается ошибка Dataset not in edit or insert mode. И вообще у меня для DBLookupComboBox нет источника данных, есть только источник строк, а здесь это не одно и то же:-) Или может я не понял?
← →
Жук (2003-04-01 08:42) [7]Если нет источника, тогда
DBLookupComboBox1.KeyValue:=nil
← →
caesar (2003-04-01 08:50) [8]Использую следующую процедуру:
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 появляется то значение которое я выбрял раньше.
Хотя при перезапуске оно пустое :-)!
← →
caesar (2003-04-01 08:55) [9]Огромное спасибо! Только KeyValue:= "" , а не nil т.к. в если использовать nil то выдается ошибка несовместимости типов! :-)
← →
dash78 (2003-04-01 12:16) [10]попробуй KeyValue:=-1
у меня прокатывает
← →
Соловьев (2003-04-01 12:45) [11]
> KeyValue:= "" , а не nil т.к. в если использовать nil то
> выдается ошибка несовместимости типов! :-)
> Johnmen © (31.03.03 16:50)
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.04.17;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.007 c