47. Глобальный объект Printer.

Объект Printer класса ТPrinter автоматически создается, если в программе есть ссылка на модуль Printers. При помощи свойств и методов этого класса можно распечатывать не только тексты, но и графику. Настроить принтер можно с помощью специального компонента VCL - стандартного системного диалога TPrinterSetupDialog. Вывод на принтер в Windows ничем не отличается от вывода на экран: рисование осуществляется с использованием свойства Canvas объекта Printer. Размер листа в пикселях определяют свойства Height и Width, а набор принтерных шрифтов – свойство Fonts. Основные свойства объекта Printer :

Property aborted:boolea; -содержит true если выполнение предыдущего задания на печать было досрочно прекращено.

Property canvas:TCanvas;-канва принтера-основной инструмент создания изображения на листе бумаги.

Property copies:integer;-указывает требуемое кол-во копий документа.

Property fonts:TStrings;-содержит список доступных принетру шрифтов.

Property printers:TStings;-содержит список всех доступны принтеров.

Property printing:Boolean;-содержит true если принтер занят печатью документа.

Property pagenumber:integer;-содержит номер печатаемой стр документа.

Методы:procedure abort;-досрочное прекращает печать документа.

Procedure begindoc;-начинает печать докум.

Procedure enddoc-заканч печать док.

Procedure newpage;-начинает печать новой стр документа.

48. Глобальный объект Clipboard. Класс ТClipboard предоставляет программисту интерфейс с буфером обмена. При использовании модуля Clipbrd, становится доступным глобальный объект Clipboard, класса ТClipboard, инкапсулирующий свойства и методы для работы с буфером обмена. Свойства объекта Clipboard:property asText:string;-рассматривает содержимое буфера обмена как текстовую стрку неогран длины.

Property formatCount:integer;-содержит число форматов в буфере на данный момент.

Методы:procedure assign(source:TPersistent);-копирует изображение в буфер обмена.

Procedure clear;-очищает буфер обмена.

Procedure close;-уменьш на1счетчик блокировок буфера обмена и закрывает его если счетчик содержит 0.

Procedure open;-увеличивает на 1 счетчик блокировок буфера обмена и открывает его если он еще не был открыт.

Большая часть компонентов, предназначенных для хранения текста и/Или изображений, имеют собственные методы для работы с буфером обмена. Например, текстовые поля TEdit, TMemo, TRichEdit имеют методы CopyToClipboard, CutToClipboard, PasteFromClipboard. Компонент TImage имеет свойство Picture класс TPicture., которое инкапсулирует методы LoadFromClipboardFormat, SaveTOClipboardFormat и RegisterClipboardFormat — с помощью этих методов компонент обменивается с буфером изображениями определенного формата и может зарегистрировать в нем новый формат изображения. Тем не менее эти и другие компоненты для работы с буфером могут использовать свойство AsText объекта Clipboard и его методы Assign, GetTextBuffer, SetTextBuffer.

Для копирования в буфер обмена графических и текстовых данных используются различные методы. Чтобы поместить в буфер обмена изображение, необходимо обратиться к методу Assign буфера.

Clipboard.Open;

Clipboard.Assign(Image1.Picture);

Clipboard.Close;

Для копирования из буфера обмена можно воспользоваться методом Assign компонента TImage:

Clipboard.Open;

Image1.Picture.Assign(Clipboard);

Clipboard.Close;

Для работы с текстовой информацией используются методы SetTextBuf и GetTextBuf. Также можно копировать текст напрямую через свойство AsText.

Clipboard.Open;

Label1.Caption:= Clipboard.AsText;

Clipboard.Close;

Можно поместить в буфер обмена содержимое свойство Caption метки:

Clipboard.Open;

Clipboard.AsText:=Label1.Caption;

Clipboard.Close;

47