что то с базой

[Domanoff]

в query есть представление sql(работает), но при открытии формы и соответствеено вызова вывода данных с этого query пишет что то base not assigned

    procedure TForm1.FormCreate(Sender: TObject);
begin
 ibquery1.Open;
 label1.Caption:= ibquery1.FindField('NAME').AsString +'   '+
ibquery1.FindField('DAT').AsString;
     ibquery1.Next;
   label2.Caption:= ibquery1.FindField('NAME').AsString +'   '+
ibquery1.FindField('DAT').AsString;
   ibquery1.Next;
   label3.Caption:= ibquery1.FindField('NAME').AsString +'   '+
ibquery1.FindField('DAT').AsString;
  IBQuery1.ExecSQL;
end;

подскажите что не так?

проблема даж не в коде а в самом IBQuery1.....

[artemavd]

А может проще будет получать данные запросом? И вообще, в чем смысл Вашего года? Не могу понять его принцип.

[pu4koff]

а IBDatabase прикручен и установлено соединение с БД?

[Domanoff]

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

а IBDatabase прикручен и установлено соединение с БД?

да установлено, ошибка происходит именно при подключении этого ibquery(он кстати второй такой в приложении это имеет значение)?

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

А может проще будет получать данные запросом? И вообще, в чем смысл Вашего года? Не могу понять его принцип.

в sql query идет сортировка, а потом я просто вывожу в трех лайбла[ эти сортированые записи... а как запросом?

[Stilet]

ошибка происходит именно при подключении этого ibquery

Текст ошибки в студию.

[Domanoff]

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

Текст ошибки в студию.

projekt Projekt2.exe raised exeption class EIBclienterror with message database not assigned Process stop

именно блинн из за этого активного query такая ошибка, может потому что он второй query в приложенни,хотя первый НЕ в АКТИВЕ

[Dark_Spirit]

 procedure TForm1.FormCreate(Sender: TObject);
begin
 ibquery1.Open;
 label1.Caption:= ibquery1.FindField('NAME').AsString +'   '+
ibquery1.FindField('DAT').AsString;
     ibquery1.Next;
   label2.Caption:= ibquery1.FindField('NAME').AsString +'   '+
ibquery1.FindField('DAT').AsString;
   ibquery1.Next;
   label3.Caption:= ibquery1.FindField('NAME').AsString +'   '+
ibquery1.FindField('DAT').AsString;
  IBQuery1.ExecSQL;
end;

а зачем выделенная строка?

[Domanoff]

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

а зачем выделенная строка?

впредыдущем блоке работы с query так делал

с ошибкой разобрался,но не показывает при открытии формы вообще ничего,
а при нажатии кнопки(но нужно при активировании формы) показывает почему то только поле dat т е второе поле(хотя запрос в sql нормально работает)
код теперь такой

  procedure TForm1. FormCreate(Sender: TObject);
   begin
        datamodule2.IBQuery3.Open;
        label1.Caption:=  datamodule2.IBQuery3.FindField('NAME').AsString +'   '+
           datamodule2.IBQuery3.FindField('DAT').AsString;
      datamodule2.IBQuery3.Next;
   label2.Caption:=  datamodule2.IBQuery3.FindField('NAME').AsString +'   '+
        datamodule2.IBQuery3.FindField('DAT').AsString;
    datamodule2.IBQuery3.Next;
   label3.Caption:=  datamodule2.IBQuery3.FindField('NAME').AsString +'   '+
       datamodule2.IBQuery3.FindField('DAT').AsString;
 datamodule2.IBQuery3.Open;
 datamodule2.IBQuery3.Close;

   //datamodule2.IBQuery3.ExecSQL;
end;

[Stilet]

database not assigned

Ой. Ну да, ты же в топе писал...

а зачем выделенная строка?

Кстати да.

datamodule2.IBQuery3.Open;
datamodule2.IBQuery3.Close;

Что ты этими действиями хотел сделать то?

[Domanoff]

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

Ой. Ну да, ты же в топе писал...

Кстати да.

Что ты этими действиями хотел сделать то?

кто то мне советовал оба действия при предыдущей работе с этим компонентом....но с ошибкой разобрался новая маза см выше)