Не отображается автоинкрементация при добавлении записи

[vuzhakov]

База создана на основе FireBird v2.5 с помощью IBExpert в Delphi 10
Подключение через :
драйвер ODBC FireBird|InterBase(r) driver -> ADOConnection -> DbQuery -> DataSource -> DBGrid.


Состоит из трёх таблиц, в одной из которых присутствуют ключевые поля оставшихся двух, в качестве внешних ключей.
Для ключевых полей каждой таблицы в IBExpert создан триггер автоинкрементации (причём BEFORE INSERT), использующий созданные там же генераторы.

При добавлении записи в IBExpert автоинкрементация работает отлично.
Когда же я делаю то же самое в главной таблице в Delphi ,с помощью тыканья кнопки + на DBNavigator , в ключевом поле записи ничего не отображается.
Нажимаю "галочку" — транзакция завершается, но в ключевом поле стоит 0.
При этом свойство IsolationLevel у компонента ADOConnection выставлен в ilReadCommited.
Если же открыть базу и закрыть снова — все ключевые поля записей, созданных через DBNavigator у которых в DBGrid ранее отображался ноль при создании, теперь имеют вполне кошерный номер.
Есть ли какой-то менее "тотальный" метод обновить автоинкрементирующиеся значения без закрытия/открытия ADOConnection?

P.S.
Курсор на стороне клиента (на сторону сервера не могу выставить, но это уже другая история)

[dron-s]

зачем используешь ADO?
для работы с Firebird/Interbase есть штатные IBX или одни из лучших компонентов доступа к FB/IB - FIBPlus... версия 6.9.9 как раз поддерживает D2010

[vuzhakov]

FIBPlus всё же платная, а я хотел сделать полностью бесплатный продукт по всем звеньям — от базы до оболочки

[dron-s]

тогда IBX тебе в руки

[vuzhakov]

Что-то я не могу понять, чем с вкладки InterBase подключиться к базе FireBird. Не выходит.

[vuzhakov]

Так. Вроде бы здесь аналог ADOConnection это IBDataBase.
Только не жрёт он мою базу FireBird.

Update 1:
Разобрался с компонентами IB (мои извинения за проявленную торопливость) — сейчас пробую.

[bezOn]

Сообщение от vuzhakov

...Для ключевых полей каждой таблицы в IBExpert создан триггер автоинкрементации (причём BEFORE INSERT)...

Этот метод не очень надежен. Если таблица каким-то образом испортится и понадобится ее пересобрать, автоинкрементные поля будут перенумерованы.

[bezOn]

Сообщение от vuzhakov

Разобрался с компонентами IB (мои извинения за проявленную торопливость) — сейчас пробую.

Также внимательно посмотри на компонент "IBStoredProc"

Этой компоненте можно назначить "генератор" и потом в процессе вставки записи, используя метод ExecProc получить с генерированный ID.

Вот здесь я показывал работу IBStoreProc

[vuzhakov]

Этот метод не очень надежен.

Мне в принципе теперь в голову не приходит, для чего бы я мог использовать такой триггер, раз уж при работе с программой нужно после записи каждого значения перезапускать набор данных.

Я-то по наивности полагал, что раз написано BEFORE INSERT значит before insert, а не как бог на душу положит -)

[vuzhakov]

За компонент спасибо — поковыряю его.

Этой компоненте можно назначить "генератор"

Кстати, генератор-то использовать можно созданный ранее для триггера?