Delphi для профессионалов



 

Просмотр и печать отчета


Если в предыдущем пункте, обсуждая отчет в приложении Delphi, мы говорили о компоненте TRvproject, то за выполнение любых операций с ним отвечает компонент TRvSystem.

При стандартной настройке этого компонента при печати или предварительном просмотре отчета всегда отображается диалог настройки печати (см. рис. 23.4). Если отображение этого диалога необходимо, печать текущего отчета компонента TRvproject, с которым связан данный компонент TrvSystem. осуществляется методом

procedure Execute;

любого из этих компонентов.

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

Сначала нужно настроить свойство

type

TReportDest = (rdPreview, rdPrinter, rdFile);

 property DefaultDest: TReportDest;

которое определяет, куда будет направлен отчет — в окно просмотра, на принтер или в файл.

Затем необходимо изменить свойство

type

SystemSetup = (ssAllowSetup, ssAllowCopies, ssAllowCollate,

ssAllowDuplex, ssAllowDestPreview, ssAllowDestPrinter, ssAllowDestFiie,

ssAllowPrinterSetup);

TSystemSetups = Set of TSystemSetup;

property SystemSetups: TSystemSetups;

убрав из него опцию ssAllowSetup, которая включена по умолчанию:

RvSysteml.SystemSetups := RvSysteml.SystemSetups — [ssAllowSetup];

и, наконец ,свойству

property DoNativeOutput: Boolean;

необходимо присвоить значение False, т. к. по умолчанию оно имеет значение True, которое и заставляет компонент показывать диалог настройки печати перед выполнением операции.

Обратите внимание на очень важную деталь — чтобы все сделанные настройки действительно сработали, печать отчета необходимо выполнять только методом Execute Компонента TRvProjeet.