Исчезает результат из DbGrid'a

[Lokos]

Здравствуйте.
Проблема в следующем на событие формы OnShow выполняется код

FIBMyObjectDS:=TFIBDataSet.Create(nil);
  
   FIBMyObjectDS.Database:=DM1.FIBDB;
   FIBMyObjectDS.Transaction:=DM1.FIBT;
   FIBMyObjectDS.AutoCommit:=True;
   DSMyObject:=TDataSource.Create(nil);
   DSMyObject.DataSet:=FIBMyObjectDS;
   FormGlav.dbgrdMyObject.DataSource:=DSMyObject;
   FIBMyObjectDS.Close;
   FIBMyObjectDS.SQLs.SelectSQL.Text:='SELECT ND_GEO_PARAM."УЛИЦА",' +
                                             'ND_GEO_PARAM."ДОМ",' +
                                             'ND_TECHNIKAL_PARAM."ОБЩ. ПЛОЩАДЬ",' +
                                             'ND_TECHNIKAL_PARAM."ЖИЛ. ПЛОЩАДЬ",' +
                                             'ND_TECHNIKAL_PARAM."ЦЕНА",' +
                                             'ND_TECHNIKAL_PARAM."АВАНС" ' +
                                             'FROM ND_GEO_PARAM,ND_TECHNIKAL_PARAM,ND_UR_PARAM WHERE '+
  ' (ND_GEO_PARAM.ID=ND_TECHNIKAL_PARAM.ID AND ND_UR_PARAM.ID=ND_GEO_PARAM.ID) AND'+
  ' (ND_UR_PARAM."ФИО АГЕНТА"='+QuotedStr(AutorizationForm.fam+' '+AutorizationForm.name1+
  ' '+AutorizationForm.otch)+')';
   FIBMyObjectDS.Open;
   FIBMyObjectDS.Last;
   FormGlav.grpMyObject.Caption:='Мои объекты - '+Inttostr(FIBMyObjectDS.RecordCount);
   FIBMyObjectDS.First;

запрос выполняется показывается сколько объектов выбрано но dbgrid не чего не отображает. Если данный код выполнять на кнопку то все в порядке. В чем может быть проблема?

[Serge_Bliznykov]

1) не знаю, почему у Вас код не отрабатывает... возможно, что ещё на каком-то событии есть обработка тех же самых контролов..
попробуйте поместить этот код на событие формы onCreate

2) никто не отменял отладку. Ставьте точку останова на нужном операторе и смотрите в отладчике, чему равен grpMyObject.Caption

3) когда имя контрола записывают полностью (с указанием формы), меня это всегда настораживает... А что, этот код находится не внутри формы FormGlav ?! Может быть, в FormGlav ещё какие-то обработчики висят?

4) уберите .Last и .First - они в коде СОВСЕМ не нужны! И, кроме лишних тормозов, это Вам ничего не даёт.
RecordCount доступен и без этих "прыжков" по датасету!!

[Lokos]

last и first так для теста были.
grpMyObject.Caption отображает количество записей которые были выбраны и отображает их правильно но вот в dbgride они в прямом смысле слова исчезают. он отображает результат после чего он просто исчезает(
если сделать данный код на кнопку то все работает как надо.
если сделать на formCreate то вылетает ошибка не существующего адреса.

по поводу RecordCount
если не сделать last в dataset то RecordCount будет равен 1 а если поставить last то он будет равен количеству записей и номеру текущей записи

ошибка найдена как всегда все банально и глупо)