VPF::FIBPlus и добавление данных - Форум программистов

TaNK

Дата 26.12.2007, 14:10 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 669
Регистрация: 29.10.2006
Где: Краснодар

Репутация: нет
Всего: 1

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

Код


Dataset1.Insert;
 // DAtaset1.FieldByName('COD').AsString := Trim(COD.Text); // если это закентено то прога выдают ошибку 
  DAtaset1.FieldByName('Name1').AsString := Trim(Edit2.Text);
  Dataset1.FieldByName('Name2').AsString := Trim(Edit3.Text);
  DAtaset1.FieldByName('Name3').AsString := Trim(Edit4.Text);
  Dataset1.FieldByName('Birthday').AsDateTime := StrToDateTime(Trim(Edit6.Text));
  DAtaset1.FieldByName('Sex').AsString := Trim(Edit5.Text);
  Dataset1.Post;

?*????

Присоединённый файл ( Кол-во скачиваний: 12 )

F_______.JPG 14,28 Kb

--------------------

Oracle 11.2.0.3.0
FireBird 1.0-2.5

Anark1

Дата 26.12.2007, 14:18 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 622
Регистрация: 15.12.2006
Где: RF -> Moscow

Репутация: 1
Всего: 11

Что за поле COD ?
NOT NULL ? UNIQUE ? AUTO INCREMENT (TRIGGER ON INSERT + GENERATOR)

--------------------

Enjoy yourself, still you can...;)

TaNK

Дата 26.12.2007, 14:22 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 669
Регистрация: 29.10.2006
Где: Краснодар

Репутация: нет
Всего: 1

Код


CREATE TABLE PEOPLE
( COD       D_INTEGER NOT NULL,  /* Код человека */
  NAME1     D_CHAR15,            /* Имя */
  NAME2     D_CHAR15,            /* Отчество */
  NAME3     D_CHAR20,            /* Фамилия */
  BIRTHDAY  D_DATE,              /* Дата рождения */
  SEX       D_CHAR1 DEFAULT '0', /* Пол: */
                                 /* 0 - мужской, */
                                 /* 1 - женский. */
  FULLNAME  COMPUTED BY          /* Вычисляемый столбец */
    (NAME3 || ' ' || NAME1 || ' ' || NAME2),
  CODMOTHER    D_INTEGER,        /* Ссылка на мать */
  CODFATHER    D_INTEGER,        /* Ссылка на отца */
  CODOTHERHALF D_INTEGER,        /* Ссылка на супруга */
  CONSTRAINT PK_PEOPLE PRIMARY KEY (COD),
  CONSTRAINT CH_PEOPLE CHECK (SEX IN ('0', '1')),
  CONSTRAINT FK1_PEOPLE
    FOREIGN KEY (CODMOTHER) REFERENCES PEOPLE (COD)
      ON DELETE SET NULL,
  CONSTRAINT FK2_PEOPLE
    FOREIGN KEY (CODFATHER) REFERENCES PEOPLE (COD)
      ON DELETE SET NULL,
  CONSTRAINT FK3_PEOPLE
    FOREIGN KEY (CODOTHERHALF) REFERENCES PEOPLE (COD)
      ON DELETE SET NULL

Это сообщение отредактировал(а) TaNK - 26.12.2007, 14:22

--------------------

Oracle 11.2.0.3.0
FireBird 1.0-2.5

Deniz

Дата 26.12.2007, 15:03 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1251
Регистрация: 16.10.2004
Где: Новый Уренгой

Репутация: 8
Всего: 44

посмотри в pFIBDataSet.AutoUpdateOptions там есть возможность настройки генератора

--------------------

"Для того чтобы сделать шаг вперед, достаточно пинка сзади" (с)

TaNK

Дата 26.12.2007, 15:38 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 669
Регистрация: 29.10.2006
Где: Краснодар

Репутация: нет
Всего: 1

Спасибо всем и в том числе Денизу +1
Вот решение...

Присоединённый файл ( Кол-во скачиваний: 19 )

Dataset.JPG 27,87 Kb

--------------------

Oracle 11.2.0.3.0
FireBird 1.0-2.5

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Базы данных и репортинг \| Следующая тема »