Отображение дочерней полосы в зависимости от печати последней детальной полосы в повторе

Delphi , Компоненты и Классы , TQuickReport

Проблема, с которой сталкиваются разработчики, работающие с отчетами в QuickRep, заключается в том, что они хотят отображать дочернюю полосу только после печати последней детальной полосы в повторе. Вопрос заключается в том, как определить, что печатается последняя детальная полоса.

Один из подходов, который был tentativa, заключается в проверке свойства EOF (End Of File) набора данных в событии BeforePrint детальной полосы. Однако, как оказалось, свойство EOF не устанавливается в TRUE до тех пор, пока не будет достигнут конец набора данных.

Другой подход заключается в использовании события AfterPrint детальной полосы, но и в этом случае свойство EOF не устанавливается в TRUE.

Один из альтернативных ответов заключается в создании закладки в наборе данных, перемещении курсора на следующую запись и проверке свойства EOF, а затем возврате к закладке. Однако этот подход может привести к нежелательным последствиям, таким как потеря данных или некорректное отображение отчета.

Подтвержденный ответ заключается в том, что можно установить свойство FooterBand детальной полосы в значение дочерней полосы. Это приведет к тому, что дочерняя полоса будет отображаться только после печати всех повторяющихся детальных полос.

Пример кода на Object Pascal (Delphi) для решения этой проблемы может выглядеть следующим образом:

procedure TForm1.FormCreate(Sender: TObject);
begin
  // Устанавливаем дочернюю полосу в качестве footer-полосы детальной полосы
  DetailBand1.FooterBand := ChildBand1;
end;

В этом примере в событии FormCreate устанавливается свойство FooterBand детальной полосы в значение дочерней полосы. Это приведет к тому, что дочерняя полоса будет отображаться только после печати всех повторяющихся детальных полос.

Создано по материалам из источника по ссылке.

Разработчики хотят, чтобы в отчетах QuickRep дочерняя полоса отображалась только после печати последней детальной полосы в повторе, и ищут способ определить, что печатается последняя детальная полоса.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: TQuickReport ::