Событие OnBeforePrint возникает сразу перед началом задания на печать. Это может быть полезно для инициализации элементов не связанных с базой данных, таких как указатели записей таблици. Так же событие может быть полезным для установки элементов отчета, которые должны быть установлены перед началом (такие как размер бумаги и ориентация). Code procedure TReportForm.BeforePrintReport5(Sender: TObject);
begin
with Sender as TBaseReport do begin
StatusFormat := 'Печать страници'#13''#13'';
StatusText.Add('');
StatusText.Add('');
end;
CustomerTable.First;
end; |
