TRVPrint.ContinuousPrint

<< Нажмите, чтобы показать Содержание >>

TRVPrint.ContinuousPrint

Печатает весь документ в рамках текущего задания печати.

procedure ContinuousPrint;

Этот метод полезен, если требуется напечатать несколько документов в одном задании печати. В остальных случаях используйте методы Print или PrintPages.

Перед вызовом этого метода необходимо назначить исходный документ для печати (метод AssignSource) и отформатировать страницы (метод FormatPages).

Не вызывайте этот метод, если VirtualPrinter.Active = True.

Пример 1. Как напечатать несколько документов в одном задании печати

В этом примере один и тот же RVPrint используется для печати RichView1 и RichView2. Этот код начинает печать RichView2 на той странице, на которой заканчивается RichView1.

Printer.BeginDoc; 

// печать RichView1

RVPrint.StartAt := 0

RVPrint.TransparentBackground := True; 

RVPrint.AssignSource(RichView1); 

RVPrint.FormatPages(rvdoALL); 

RVPrint.ContinuousPrint; 

// печать RichView2

RVPrint.StartAt := RVPrint.EndAt

RVPrint.AssignSource(RichView2); 

RVPrint.FormatPages(rvdoALL); 

RVPrint.ContinuousPrint; 

Printer.EndDoc;

Пример 2. Как использовать книжную и альбомную ориентацию в одном задании печати

В этом примере один и тот же RVPrint используется для печати RichView1 и RichView2 с разной ориентацией страниц.

Printer.BeginDoc; 

// печать RichView1 в портретной ориентации

Printer.Orientation := poPortrait;

RVPrint.AssignSource(RichView1); 

RVPrint.FormatPages(rvdoALL); 

RVPrint.ContinuousPrint; 

// печать RichView1 в альбомной ориентации

Printer.NewPage;

Printer.Orientation := poLandscape;

RVPrint.AssignSource(RichView2); 

RVPrint.FormatPages(rvdoALL); 

RVPrint.ContinuousPrint; 

Printer.EndDoc;