Главная страница | Контакты | Случайная страница Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Графические примитивы; пропорциональная печать изображения с экрана

Холст задаётся свойством Canvas (позволяет выводить графические примитивы и задавать их параметры). Холст представляет собой систему координат, начало отсчета которой в левом верхнем углу. Для рисования графический объектов используют карандаш(Pen). Для заполнения замкнутых областей- кисть(Brush).

Для задания цвета используют свойство .Color. Цвет в делфи можно задавать 2мя способами: стандартные цвета(cl+цвет, если цвет фона, то clbtnface) и RGB цвета(функция RGB())

Пример: Pen.color:=clBlue;

Графические примитивы:

1. LineTo(x,y);- рисует линию от Х до У

MoveTo(x,y);- до какой точки рисует. Устанавливает там курсор

1. Ellipse(x1,y1,х2,у2);- эллипс, вписанный в прямоугольник с корд(x1,y1,х2,у2)
2. Arc(x1,y1,x2,y2,x3,y3,x4,y4); -вычеркивают дугу эллипса, вписанного в прямоугольник с вершинами (x1,y1,х2,у2); х3,у3-точка начала дуги;х4,у4-точка конца дуги
3. Pie(x1,y1,x2,y2,x3,y3,x4,y4); -cтроит сектор
4. Rectangle(x1,y1,х2,у2);- строит четырехугольник

!!! Координаты принадлежат к типу данных Integer

Пропорциональная печать изображения с экрана

Необходимо предусмотреть умножение всех размеров используемых объектов на константу, определяющую различие между размерами окна и размерами бумаги.

Для этого необходимо использовать свойства принтера Printer.PageWidth и Printer.PageHeight, дающие размеры бумаги – ширину и высоту.

Получить коэффициенты пересчета можно, поделив самые короткие размеры печатаемой страницы на самые короткие размеры отображаемой формы:

.

Для пропорциональной печати нужно умножать все размеры на эту константу.