Помогите с IBX в Delphi 7

[3lander]

Уважаемые программеры! Никак не могу заставить работать БД с помощью компонентов IBX (закладка в Дельфи7 "InterBase").
Кидаю на форму компоненты: IBDataBase, IBTransaction, IBDataSet, IBQuery - все связи нормальные, поля по идеи как надо установлены (единственное что в IBTransaction особо ничего не менял, тока связял с др компонентами) и с помощью TDataSet подключаюсь к DBGrid.
Таблица открывается нормально (для примера 2 поля - ключевое INTEGER и вещественное DECIMAL(15,2)) - но при попытки добавления выскакиевает ошибка - "таблица находится в режиме Read Only". Как это исправить?
Заранее спасибо,
3Lander.

[mihali4]

А вы попробуйте использовать спец. компонент IBUpdateSQL...

[3lander]

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

А вы попробуйте использовать спец. компонент IBUpdateSQL...

ясно))) и какие параметры в нем надо указать если не секрет

[mihali4]

У IBQuery (как и у IBTable) последней строкой в инспекторе объектов стоит свойство UpdateObject. Так что любой IBUpdateSQL можно связать с любым IBQuery.
А дальше совсем просто - присваиваем нужное значение нужному свойству IBUpdateSQL (надеюсь, свойства понятны из их названий? ) и запускаем на выполнение обычным способом - ExecSQL...
Вместо IBQuery можно спокойно использовать IBTable, ведь IBUpdateSQL все за них и для них сделает...

[3lander]

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

У IBQuery (как и у IBTable) последней строкой в инспекторе объектов стоит свойство UpdateObject. Так что любой IBUpdateSQL можно связать с любым IBQuery.
А дальше совсем просто - присваиваем нужное значение нужному свойству IBUpdateSQL (надеюсь, свойства понятны из их названий? ) и запускаем на выполнение обычным способом - ExecSQL...
Вместо IBQuery можно спокойно использовать IBTable, ведь IBUpdateSQL все за них и для них сделает...

мда... ошибка ушла - но всё подвисло)))
база состоит из 2 полей (для теста): NUMB INTEGER, SUMM DECIMAL(15,2)

вот код на кнопке:
IBQuery1.Open;
IBQuery1.Edit;
IBQuery1.Append;
IBQuery1['NUMB']:=1;
IBQuery1['SUMM']:=11.11;
IBQuery1.Post;


(в IBUpdateSQL) добавил след код: (он кстати сгенерился сам в IBDataSet):

delete from MYTABLE
where
NUMB = :OLD_NUMB

insert into MYTABLE
(SUMM)
values
(:SUMM)

update MYTABLE
set
SUMM = :SUMM
where
NUMB = :OLD_NUMB

[3lander]

надеюсь ничего что я использую .Open, а не ExecSQL - менял но не пашет((

[pu4koff]

выкинь нах IBQuery вместе с IBUpdateSQL, а оставь вместо них один IBDAtaSet с запросами из выше упомянутых компонент. IBQuery - зло. Если хотите убедиться, то помотрите исходники. IbQuery фактически урезанный IBDataSet, а IBUpdateSQL делает IBQuery по функционалу аналогом IBDataSet, так зачем эти пляски с бубном, когда есть нормальный один компонент?

[pu4koff]

Сообщение от 3lander

надеюсь ничего что я использую .Open, а не ExecSQL - менял но не пашет((

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

[mihali4]

Так "код на кнопке" теперь не нужен!
Там теперь нужно задать переменные для скулек IBUpdateSQL и запустить IBUpdateSQL.ExecSQL.
Потом нужно просто закрыть/открыть IBQuery, чтобы увидеть изменения после отработки IBUpdateSQL.ExecSQL.
И что это вообще за конструкция:

IBQuery1.Edit;
IBQuery1.Append;

???
Уж либо добавляем, либо редактируем, если уж на то пошло

P.S. И по поводу IBDаtaSet pu4koFF правильно указал...

[3lander]

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

выкинь нах IBQuery вместе с IBUpdateSQL, а оставь вместо них один IBDAtaSet с запросами из выше упомянутых компонент. IBQuery - зло. Если хотите убедиться, то помотрите исходники. IbQuery фактически урезанный IBDataSet, а IBUpdateSQL делает IBQuery по функционалу аналогом IBDataSet, так зачем эти пляски с бубном, когда есть нормальный один компонент?

боюсь без компонента IBTransaction - не пашет.
вощем выкинул что вы сказали - все подвисло нахрен((