События
| Событие | Назначение |
| property AfterPreview : TQRAfterPreviewPrint; | Возникает в момент закрытия окна предварительного просмотра отчета. |
| property AfterPrint: TQRAfterPrintEvent; | Наступает после печати отчета или его подготовки к печати. |
| property BeforePrint: TQRBeforePrintEvent; | Наступает в момент начала генерации отчета (до выдачи окна предварительного просмотра отчета или до его печати). |
| property OnEndPage: procedure (Sender: TObject); | Возникает в момент подготовки к генерации последней страницы отчета. |
| property OnNeedData: procedure (Sender: TObject; var MoreData: boolean); | Используется при создании отчета по данным, которые берутся не из НД, а из текстового файла, списка строк, массива и т.п. В параметре MoreData обработчик должен вернуть True, если источник данных еще не исчерпан. |
| property OnPreview: procedure (Sender: TObject); | Используется для связывания с отчетом нестандартного окна просмотра (см. ниже). |
| property OnStartPage: procedure (Sender: TObject); | Возникает в момент подготовки к генерации первой страницы отчета. |
С помощью компонента QRPreview программист может создать нестандартное окно предварительного просмотра. Для связи с отчетом используется событие OnPreview по следующей схеме:
Procedure RepForm.MyREportOnPreviewEvent(Sender: TObject);
begin
MyPrevForm.QRPreview1.QRPrinter := TQRPrinter(Sender);
MyPreviewForm.Show;
end;
Чтобы явное приведение типа TQRPrinter(Sender) стало возможным, необходима ссылка на модуль QRPrntr в предложении Uses соответствующего модуля (в примере – модуля RepForm).
