Справочник по компонентам Delphi. Часть 2 - Компонент TPrintDlalog

Written on . Posted in Delphi

ОГЛАВЛЕНИЕ

Страница 42 из 61

Компонент TPrintDlalog

TObject -> TPersistent -> TCornponent -> TCoinmonDialog -> TPrinterSetupDialog -> TPrintDialog

Модуль DIALOGS

Страница Палитры компонентов Dialogs

Предназначен для настройки параметров вывода текста на принтер. Опции этого диалога определяются свойством:

(pb) property Options: TPrintDialogOptions;
TPrintDialogOption = (poPrintToFile, poPageNums, poSelection, poWarning, poHelp, poDisablePrintToFile);
TPrintDialogOptions = set of TPrintDialogOption;
  • poWaming — извещает пользователя при инициализации диалога, если в системе нет установленных принтеров.
  • poHelp — включает в диалог кнопку Help;

Печать может быть перенаправлена в файл. Для этого в диалог может быть включен специальный флажок Print To File. Состояние его зависит от двух опций:

  • poPrintToFile — разрешает появление в диалоге этого флажка;
  • PoDisablePrintToFile — флажок показывается серьм цветом и переключение запрещено.По умолчанию для печати предназначается весь текст. Однако, если уста­новлены следующие опции, из него может быть напечатана только часть вместе с полями для ввода диапазона делается доступным);
  • poSelection — разрешает выбор только выделенного фрагмента текста (переключатель Selection делается доступным).

Остальные свойства компонента соответствуют разньм элементам управления диалога (кроме MinPage и MaxPage). Их начальные значения отображаются при вызове метода Execute.

После завершения диалога можно определить с помощью следующего свойства, что именно хочет напечатать пользователь — все, выделенный текст или диапа­зон страниц:

property PrintRange: TPrintRange;
TPrintRange = (prAllPages, prSelection, prPageNums);
В случае prPageNums печататься будут страницы от определяемой свойством(Pb) property FromPage: Integer;до определяемой свойством(РЬ) property ToPage: Integer;

При этом они должны полностью лежать в диапазоне, определенном свойст­вами:

(Pb) property MinPage: Integer;fpB) property MaxPage: Integer;

Если пользователь ввел значение FromPage или ToPage, выходящее за пределы этого диапазона, то после нажатия кнопки ОК появится сообщение об ошибке, и диалог не будет завершен.

Если два последних свойства не определены (равны 0), то диапазоны и ограничения не действуют.

Если пользователь выбрал печать в файл, свойство

(Рb) property PrintToFile: Boolean;
будет равно True.

Количество копий, которые необходимо отпечатать, определяется свойством:

(Pb) property Copies: Integer;
Если свойство
(pd) property Collate: Boolean;

устанавлено в True, то печать нескольких копий осуществляется последова­тельно: полностью первая, затем вторая и т. д. В противном случае печатаются последовательно одинаковые листы всех копий.

форум delphi