Сервер FB 2.1.3.18185 Win2003
Клиентская программа на winXP SP3
Delphi 7 компоненты IBX
форма документа, в ней DBGrid куда данные из IBQuery идут
есть кусок кода:
Код: Выделить всё
ExcelWorkSheet1.Range['B11'].Value:=inttostr(IBQuery1.RecordCount)+
' ('+KolToStrin(inttostr(IBQuery1.RecordCount))+')'+' шт. номинальной стоимостью 1 (один) руб.';
количество записей в шапке отчета получаю IBQuery1.RecordCount
Я знаю что это не правильно , но приложение однопользовательское и этот кусок я конечно потом перепишу правильно через select count(id)
Сейчас имеется глюк в котором хочеться разобраться:
при нажатии кнопки отчета и соотвественно открытом наборе данных RecordCount дает 9 записей, хотя их 15
после закрытия получившегося Excel Отчета, опять нажимаю кнопку отчета (не перечитывая и не меняя данные) и уже выдает правильные 15 записей.
Если например в открывшейся форме документы снаяала перейти ручками на последнюю запись, то при выводе отчета он покажет правильные 15 записей.
вот и непонятно - это компоненты IBX глючат или что?
P.S. добавив перед началом формирования отчета пустой цикл:
Код: Выделить всё
while not IBQuery1.Eof do IBQuery1.Next;