Как сделать калькулятор в Delphi?

Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.

Как Delphi реализует многоплатформенную разработку?

Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...

Класс TPrinter

Delphi имеет стандартный объект для доступа к принтеру - TPRINTER, находящийся в модуле PRINTERS. В этом модуле имеется переменная Printer:Tpinter, что избавляет от необходимости описывать свою. Он позволяет выводить данные на печать и управлять процессом печати. Правда, в некоторых версиях Delphi1 он имеет "глюк" - не работают функции Draw и StrethDraw. Но эта проблема поправима - можно использовать функции API. Далее приведены основные поля и методы объекта Printers :

PROPERTY

  • Aborted:boolean - Показывает, что процесс печати прерван
  • Canvas:Tcanvas - Стандартный Canvas, как у любого графического объекта. Он позволяет рисовать на листе бумаге графику, выводить текст ... . Тут есть несколько особенностей, они описаны после описания объекта.
  • Fonts:Tstrings - Возвращает список шрифтов, поддерживаемых принтером
  • Handle:HDS - Получить Handle на принтер для использования функций API (см. Далее)
  • Orientation:TprinterOrientation - Ориентация листа при печати : (poPortrait, poLandscape)
  • PageHeight:integer - Высота листа в пикселах
  • PageNumber:integer - Номер страницы, увеличивается на 1 при каждом NewPage
  • PageWidth:integer - Ширина листа в пикселах
  • PrinterIndex:integer - Номер используемого принтера по списку доступных принтеров Printers
  • Printers:Tstrings - Список доступных принтеров
  • Printing:boolean - Флаг, показывающий, что сейчас идет процесс печати
  • Title:string - Имя документа или приложения. Под этим именем задание на печать регистрируется в диспетчере печати

METODS

  • AssignPrn(f:TextFile) - Связать текстовый файл с принтером. Далее вывод информации в этот файл приводит к ее печати. Удобно в простейших случаях.
  • Abort - Сбросить печать
  • BeginDoc - Начать печать
  • NewPage - Начать новую страницу
  • EndDoc - Завершить печать.

Пример :

Procedure

TForm1.Button1Click(Sender: TObject); Begin

With

Printer do

Begin

// Начало печати BeginDoc; // Задали шрифт Canvas.Font:=label1.font; // Печатаем текст Canvas.TextOut(100,100,'Delphi World - лучше всех !!! :) '); // Конец печати EndDoc; end

; end

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2024 - All Rights Reserved - www.delphirus.com