При попытке создать объект класса TPrinter (TPrinter.Create) я получаю exception
Вопрос:
При попытке создать объект класса TPrinter (TPrinter.Create) я получаю exception.
Почему?
Ответ:
В создании объекта класса TPrinter с использованием TPrinter.Create нет необходимости, так как объект класса TPrinter (называемый Printer) автоматически создается при использовании модуля Printers.
Пример:
uses Printers;
procedure TForm1.Button1Click(Sender: TObject);
begin
Printer.BeginDoc;
Printer.Canvas.TextOut(100, 100, 'Hello World!');
Printer.EndDoc;
end; |