![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вопрос по работе с IBX [D7, IB6.x, InterBase]
3Lander © (2007-10-07 21:42:00)Уважаемые программеры! Никак не могу заставить работать БД с помощью компонентов IBX (закладка в Дельфи7 "InterBase").
Кидаю на форму компоненты: IBDataBase, IBTransaction, IBDataSet, IBQuery - все связи нормальные, поля по идеи как надо установлены (единственное что в IBTransaction особо ничего не менял, тока связял с др компонентами) и с помощью TDataSet подключаюсь к DBGrid.
Таблица открывается нормально (для примера 2 поля - ключевое INTEGER и вещественное DECIMAL(15,2)) - но при попытки добавления выскакиевает ошибка - "таблица находится в режиме Read Only". Как это исправить?
Заранее спасибо,
3Lander.
Megabyte (2007-10-10 14:07:00) [1]
> ...и с помощью TDataSet подключаюсь к DBGrid.
зачет.
> insert into MYTABLE(SUMM)values(:SUMM)
А значение ключа у тебя генерится с помощью триггера-генератора?
Параметры IBTransaction какие?
з.ы. телепатов нет!
3Lander (2007-10-07 22:15:00) [2]база состоит из 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 (2007-10-07 22:07:00) [3]
> engine © (07.10.07 21:47) [1]
> > [0] 3Lander (07.10.07 21:42)
>
> Код в студию!
вот:
IBQuery1.Open;
IBQuery1.Edit;
IBQuery1.Append;
IBQuery1['NUMB']:=1;
IBQuery1['SUMM']:=11.11;
IBQuery1.Post;
-----------------------
> Desdechado © (07.10.07 21:55) [2]
> Примеры уже изучил?
> "C:\Program Files\Borland\Delphi7\Demos\Db\IBX"
- да пытался изучить, опыта мало...(
Desdechado (2007-10-07 21:55:00) [4]Примеры уже изучил?
"C:\Program Files\Borland\Delphi7\Demos\Db\IBX"
engine (2007-10-07 21:47:00) [5]> [0] 3Lander (07.10.07 21:42)
Код в студию!