15 мая "Исходники.РУ" отмечают 20-летие присутствия в сети!
Поздравляем всех причастных и неравнодушных с юбилеем сайта!
И огромное спасибо всем, кто был с нами все эти годы!

Главная Форум Журнал Wiki DRKB Discuz!ML Помощь проекту


Печать при помощи TPrinter

Экземпляр TPrinter (с именем Printer) создаётся автоматически, если добавить юнит Printers.

Пример:

uses Printers;

procedure TForm1.Button1Click(Sender: TObject);
begin
   Printer.BeginDoc;
   Printer.Canvas.TextOut(100, 100, 'Hello World!');
   Printer.EndDoc;
end;