ошибка..наверно подключения

[Domanoff]

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

а полностью код процедуры которым заполняешь таблицу

procedure TForm3.Button1Click(Sender: TObject);
begin
   IBQuery1.SQL.Clear;

 IBQuery1.SQL.Text:='INSERT INTO MEROPRIAT(ID_MEROPRIAT,NAME,DAT) VALUES(gen_id(GEN_MEROPRIAT_ID,1),:N, :D)';
 IBQuery1.ParamByName('N').Value:=Edit1.text;
 IBQuery1.ParamByName('D').Value:=DateTimePicker1.Date;

end;

end.

и все таки с этой ашибкой активации IBQuery1 надо разобраться

[bezOn]

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

согласен,но в актив она все равно не становится с такой же ошибкой...

ТемныйДух правильно говорит.

Свойство "Active" для TQuery используется когда происходит выборка.
И правильно открывать набор программно, когда например создается форма (onCreate)
Например:

procedure TForm1.FormCreate(Sender: TObject);
begin
  {Открываем уже созданный запрос.}
  IBQuery1.Open;

end;

Так же, в этом событии, можно и любой запрос оформить;

А вот когда идёт вставка (INSERT) или изменение данных (UPDATE), тогда нужно использовать ExecSQL.
Например сохраняем данные по нажитию кнопки:

procedure TForm1.btnSaveClick(Sender: TObject);
begin
  TRY
    IBQuery2.SQL.Clear;
    IBQuery2.SQL.ADD('INSERT INTO MEROPRIAT');
    IBQuery2.SQL.ADD('(ID_MEROPRIAT, NAME)');
    IBQuery2.SQL.ADD('VALUES');
    IBQuery2.SQL.ADD('(:ID, :Name, :Date)'); {Ошибка, поле Date не заявлено в INSERT}
       IBQuery2.ParamByName('ID').asInteger := GEN_ID(GEN_MEROPRIAT_ID, 1);
       IBQuery2.ParamByName('Name').asString := Edit1.Text;
       IBQuery2.ParamByName('Date').asDateTime := DateTimePicker1.Date;

       IBQuery2.ExecSQL;
  EXCEPT
    Application.MessageBox(
      'Ошибка вставки (создания) новой записи!',
      'Создание отменено', MB_OK+MB_ICONERROR);
  END;

end;

В секции INSERT, у тебя не хватает объявленного поля, который ты используешь в параметрах (Date), это приведет к ошибке.
Вот если бы ты объявил поле, а в значениях (Values) его не указал, оно было бы сохранено пустым.

---
Ещё раз, если открываем запрос, используем IBQuery.Open
Если хотим Вставить/Изменить/Удалить данные, используем IBQuery.ExecSQL;

[Domanoff]

INSERT INTO MEROPRIAT(ID_MEROPRIAT,NAME,DAT) VALUES(gen_id(GEN_MEROPRIAT_ID,1),: N, :D) это разве не заявленное?

[bezOn]

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

...это разве не заявленное?

Это заявленное, просто я смотрел первое сообщение.

[Domanoff]

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

Это заявленное, просто я смотрел первое сообщение.

глядите че происходит, генератор(правильно обьявленный а не так как в вашем варианте - делфя не определяет генератор. ) срабатывает и в базе меняется, а вот сами значения name и dat не вставляются(((( + конфликтует с русским языком(но дело не в базе там нормально все)

[bezOn]

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

... генератор(правильно обьявленный а не так как в вашем варианте - делфя не определяет генератор. )

ну я рад что генератор работает.

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

...конфликтует с русским языком...

В чем это выражается?

Как создавали базу данных? Как у БД настроена национальную кодировка символов? Тут как бы есть над чем подумать.
Например полю типа "Date", как бэ всё равно каким языком идёт дата. Русским или Анг.

А вот символьные поля "Char" и "VarChar" для них уже необходимо указывать национальную кодировку.

[Dark_Spirit]

procedure TForm3.Button1Click(Sender: TObject);
begin
   IBQuery1.SQL.Clear;

 IBQuery1.SQL.Text:='INSERT INTO MEROPRIAT(ID_MEROPRIAT,NAME,DAT) VALUES(gen_id(GEN_MEROPRIAT_ID,1),:N, :D)';
 IBQuery1.ParamByName('N').Value:=Edit1.text;
 IBQuery1.ParamByName('D').Value:=DateTimePicker1.Date;

end;

перед end; нужно дописать строку: IBQuery1.ExecSQL;

[bezOn]

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

...генератор(правильно обьявленный а не так как в вашем варианте - делфя не определяет генератор. )...

Я давно неработал именно с компонентами InterBase, но насколько я помню, там есть "IBStoredProc", которому как раз можно назначить созданный генератор в БД и потом "правильно" работать c ним в Delphi.

т.е. получать сгенерированный ID до того, когда происходит вставка записи.

[Domanoff]

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

ну я рад что генератор работает.


В чем это выражается?

Как создавали базу данных? Как у БД настроена национальную кодировка символов? Тут как бы есть над чем подумать.
Например полю типа "Date", как бэ всё равно каким языком идёт дата. Русским или Анг.

А вот символьные поля "Char" и "VarChar" для них уже необходимо указывать национальную кодировку.

да нормально там все настроено в IBEXPERTE все работает, да и вообще все работало, расскажите почему щас поля не заполняются?!?(

[Domanoff]

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

перед end; нужно дописать строку: IBQuery1.ExecSQL;

в этом варианте при работе выдает ошибку SQL error code - 303