На этом шаге мы перечислим команды, используемые для печати и предварительного просмотра документа.

    Для печати документа достаточно использовать две команды Word Basic - процедуру просмотра FilePrintPreview и процедуру печати документа FilePrint. Последнюю процедуру можно вызывать без аргументов или с аргументами, например для задания числа копий печати.

    Примеры использования данных процедур в приложениях Delphi:

procedure TForm1.Buttonl7Click(Sender: TObject); 
begin
   WB.FilePrintPreview; 
end;

procedure TForm1.Buttonl6Click(Sender: TObject); 
begin
   WB.FilePrint; 
end;

    В процедуре для печати вместо команды FilePrint можно использовать команду FilePrintDefault или команду FilePrint(c: integer), где с - количество печатаемых копий. Для предварительного просмотра печати также можно использовать команду FilePrintPreviewFullScreen, которая разворачивает окно предварительного просмотра печати во весь экран. Для просмотра в окне нескольких печатаемых страниц применяется команда FilePrintPreviewPages(p:integer), где р - количество одновременно отображаемых страниц в одном окне.

    Следующий пример программного кода иллюстрирует использование данных функций.

procedure TForm1.Buttonl6Click(Sender: TObject); 
begin 
  WB.FilePrint (2);
end;

procedure TForm1.Buttonl7Click(Sender: TObject); 
begin 
  WB.FilePrintPreviewPages (2);
end;

    На следующем шаге мы рассмотрим сохранение документа на диске.

Предыдущий шаг Содержание Следующий шаг