Читайте эксклюзивные новости Украины на сайте Golosinfo.com.

[Point(x,y),Point(x,y),Point(x,y)..Point(x,y)]

Это не больше, чем серия вызовов функций Point, разделенных запятыми. Этих вызовов функций может быть как угодно много

Основное различие между методами Polyline и Polygon заключается в том, что метод Polygon всегда закрывает линии, которые он рисует в многоугольнике, в то время как Polyline оставляет фигуру открытой. Polygon автоматически рисует одну дополнительную линию между конечной точкой, которую он рисует, и точкой, с которой он начал рисовать. Polyline не рисует этой последней линии. Сравните синтаксис двух методов, описанных на Листинге 12.3.

ЛИСТИНГ 12.3 Рисование фигур с Polyline и Polygon

procedure TForml.FormPaint(Sender: TObject) begin WITH Canvas DO begin Brush.Color := clYellow Polygon(

[Point(150.20),

Point(260,100) ,

Point(220,220) ,

Point(80,220),

Point(40,100)]); {Последняя линия - из этой точки } { назад, к первой точке! }

PolyLine(

[Point(110,160), Point(110,100), Point(150,160), Point(190,100), Point(190,160)]);
END;
end;

Выход, порожденный Листингом 12.3, показан на Рисунке 12.6. Пятиугольник, нарисованный Polygon, имеет внутри себя букву "М", нарисованную с помощью Polyline.

ПЕЧАТЬ ГРАФИКИ

Что замечательно в печати графики Delphi, так это то, что она является тем же, что и печать экрана. Все выводимые графические примитивы в Delphi основаны на полотне. Класс TCanvas обеспечивает тот "чистый лист", на котором можно рисовать, и то, что остается объекту, который владеет полотном так, это реализовать этот чистый лист в реальном мире. Владелец полотна рисует на экране с помощью TForm внутри усеченного прямоугольника, представленного границами окна. С другой стороны, собственник полотна с помощью класса TPrinter рисует на фактически чистом листе бумаги, который выходит из вашего принтера. По существу, все методы рисования, которые вы встречали в рисовании на экране, могут быть использованы для рисования на бумаге.

Работа методов рисования та же самая, и подразумевает Декартову координатную сетку с ее началом координат в верхнем левом углу листа бумаги. В полотне для TPrinter, по сравнению с полотном для TForm, обычно гораздо больше точек растра, в чем и состоит их главное отличие. Если вы рисуете на форме фигуру нужного размера, то на принтере она окажется такого же очертания, только гораздо меньше. Если у вас лазерный принтер с высокой разрешающей способностью, то это может означать, что она будет очень крошечной.

Чтобы печатать графику, вам надо включить модуль Printers в оператор uses вашего главного модуля проекта; это то, что определяет вашу главную форму. Это позволит вам использовать объекты класса Printer. Объект класса TPrinter автоматически объявляется для вас внутри модуля Printers: Printer. Этот объект представляет выбранный для Windows принтер, и в большинстве случаев вам не прийдется волноваться по поводу объявления ваших собственных объектов TPrinter.

Механизм печати

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


⇐ Предыдущая страница| |Следующая страница ⇒

Программирование в среде Delphi



Новости за месяц

  • Декабрь
    2021
  • Пн
  • Вт
  • Ср
  • Чт
  • Пт
  • Сб
  • Вс
  • 1
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • 11
  • 12
  • 13
  • 14
  • 15
  • 16
  • 17
  • 18
  • 19
  • 20
  • 21
  • 22
  • 23
  • 24
  • 25
  • 26
  • 27
  • 28
  • 29
  • 30
  • 31