Последняя запись в DBLookUpComboBox

@KennyMccormick · Регистрация: 07.05.2010

Студворк — интернет-сервис помощи студентам

В отдельной форме добавляю значение в таблицу. Как заставить DBLookUpComboBox, находящийся на главной форме, отобразить только что добавленное значение? какие есть варианты? Возможно ли заставить его отобразить значение с наибольшим ID, которое по сути и будет последним, что я добавил.
Значение добавляю через Edit. Пытался вот так: form1.DBLookUpComboBox.KeyValue:=edit.te xt, не сработало. Так же пробовал вот так: form1.DBLookUpComboBox.KeyValue:=form1.D BLookUpComboBox.listsource.DataSet.Field sValues[edit.text] - тоже нет. Знаю, что тут скорее всего я неправильно что-то прописываю, просто написал это чтобы вы имели представление что я пытаюсь сделать и направили на верный путь! заранее благодарен.

@KennyMccormick · 11.04.2013, 19:29 **[ТС]**

Неужели ни у кого нет никаких идей? может быть как то через свойство .last. ребята помогите)

@rdama · 12.04.2013, 01:50

KennyMccormick, а переоткрыть датасет который привязан к DBLookUpComboBox.
Например так

Delphi
1
2
form1.DBLookUpComboBox.ListSource.DataSet.Close;
form1.DBLookUpComboBox.ListSource.DataSet.Open;

@KennyMccormick · 12.04.2013, 09:58 **[ТС]**

А как это может помочь? Значений в данном боксе много, почему после переоткрытия он должен отображать именно тот, который я добавил последним? Скину код, который формирует кворик, из которого он берет значения. Может это как то поможет.

Delphi
1
2
3
4
5
6
7
8
a:=DataModule2.Table_prob.Fields[0].AsInteger;
DataModule2.Query_konkr.Active:=false;
DataModule2.Query_konkr.SQL.Clear;
DataModule2.Query_konkr.SQL.Add('SELECT spec_prob, ID_obj FROM Objecties');
DataModule2.Query_konkr.SQL.Add('WHERE ID_problem=' + IntToStr(a));
DataModule2.Query_konkr.Open;
LookupCB_konkr.ListField:='spec_prob';
LookupCB_konkr.KeyField:='ID_obj';

@rdama · 12.04.2013, 10:14

Потому что добавлять надо в датасет.а не в DBLookUpComboBox.
После переоткрытия наборданных обновится. и ваш новый элемент попадет в список DBLookUpComboBox.

@KennyMccormick · 12.04.2013, 10:56 **[ТС]**

Допустим я обновил датасет, какой строчкой потом присвоить боксу новое значение?

@rdama · 12.04.2013, 11:49

KennyMccormick, после добавления обнови датасет...

Скандербег · 12.04.2013, 12:02

KennyMccormick, ответ на вопрос зависит от того какая СУБД применяется.
Например, если это Аксесс или MS SQL Server, то взять значение автоинкрементного идентификатора последней добавленной записи можно так:

Delphi
1
2
3
4
    DM.qrTmp.SQL.Text := 'select @@Identity as id';
    DM.qrTmp.Open;
    ID := DM.qrTmp.FieldValues['id'];
    DM.qrTmp.Close;

Где qrTmp = TADOQuery.
Получив идентификатор можно установить и положение в списке DBLookUpComboBox'а.

В других же СУБД такое делается по-другому.

Новые блоги и статьи Все статьи Все блоги /
Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .	Запрет удаления строк ТЧ документа при определенном условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .	Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .

@KennyMccormick 0 / 0 / 0 Регистрация: 07.05.2010 Сообщений: 50

	Последняя запись в DBLookUpComboBox 10.04.2013, 14:09. Показов 2400. Ответов 7 Метки нет (Все метки) В отдельной форме добавляю значение в таблицу. Как заставить DBLookUpComboBox, находящийся на главной форме, отобразить только что добавленное значение? какие есть варианты? Возможно ли заставить его отобразить значение с наибольшим ID, которое по сути и будет последним, что я добавил. Значение добавляю через Edit. Пытался вот так: form1.DBLookUpComboBox.KeyValue:=edit.te xt, не сработало. Так же пробовал вот так: form1.DBLookUpComboBox.KeyValue:=form1.D BLookUpComboBox.listsource.DataSet.Field sValues[edit.text] - тоже нет. Знаю, что тут скорее всего я неправильно что-то прописываю, просто написал это чтобы вы имели представление что я пытаюсь сделать и направили на верный путь! заранее благодарен. 0

@KennyMccormick 0 / 0 / 0 Регистрация: 07.05.2010 Сообщений: 50
	11.04.2013, 19:29 [ТС]
	Неужели ни у кого нет никаких идей? может быть как то через свойство .last. ребята помогите) 0

@rdama 569 / 292 / 12 Регистрация: 28.01.2011 Сообщений: 1,326
	12.04.2013, 10:14
	Потому что добавлять надо в датасет.а не в DBLookUpComboBox. После переоткрытия наборданных обновится. и ваш новый элемент попадет в список DBLookUpComboBox. 0

@KennyMccormick 0 / 0 / 0 Регистрация: 07.05.2010 Сообщений: 50
	12.04.2013, 10:56 [ТС]
	Допустим я обновил датасет, какой строчкой потом присвоить боксу новое значение? 0

@rdama 569 / 292 / 12 Регистрация: 28.01.2011 Сообщений: 1,326
	12.04.2013, 11:49
	KennyMccormick, после добавления обнови датасет... 1

Опции темы