Использование
пера
Свойство Реn
позволяет устанавливать атрибуты пера, которым производится рисование линий
и точек, а также других геометрических фигур.
Перо имеет четыре собственных свойства, которые вы можете изменять:
Color
—
цвет пера; Width
-
ширина пера; Style
—
стиль пера; Mode
—
режим пера. Значения данных свойств
определяют способ, которым будут отображаться точки линий. По умолчанию установлен
черный цвет пера и его ширина равна одному пикселу, стиль — сплошной, режим
рисования поверх текущего изображения канвы.
Рассмотрим последовательно
использование этих четырех свойств.
Цвет пера
Вы можете устанавливать
цвет пера по своему усмотрению с помощью свойства Color
во время
исполнения приложения. Для этого нужно лишь присвоить соответствующее значение
цвета свойству Color
пера Реn
.
В листинге 13.3 мы устанавливаем
красный цвет пера (значение clRed
) по нажатии кнопки Button1.
Листинг 13.3. Установка
значения цвета пера
procedure TForm1.Button1Click(Sender: TObject); begin
Canvas.Pen.Color := PenColor.ForegroundColor; end;
Ширина пера
Ширина пера определяет
толщину линий, которыми будут начерчены геометрические фигуры.
Примечание
Если вы создаете кросс-платформенное приложение, которое может функционировать как под Linux, так и под Windows 9x, и ширина пера более одного пиксела, то имейте в виду, что Windows будет всегда рисовать сплошные линии, независимо от значения свойства
Style
пера.
Для смены ширины пера достаточно
присвоить необходимое числовое значение свойству Width
пера (листинг
13.4).
Листинг 13.4.Установка
ширины пера
procedure TForm1.Button1Click(Sender: TObject); begin
Canvas.Pen.Width := 5; end;
Стиль пера
Свойство Style
позволяет вам устанавливать различные стили начертания линий. Это могут быть
сплошные линии, пунктирные, точечные и др.
В листинге 13.5 стиль пера
меняет последовательно все возможные значения.
Листинг 13.5. Смена
стилей пера
procedure TForm1.Button1Click(Sender: TObject); begin
with Canvas.Pen do begin Style = psSolid
Style = psDash Style = psDot Style = psDashDot Style = psDashDotDot Style = psClear; end; end;
Режим пера
Свойство пера Mode
позволяет вам устанавливать различные режимы комбинирования цвета пера с цветом,
расположенным на канве. Например, режим постоянного цвета пера, режим инверсии
цвета пера или фона канвы пр.
Установка и определение
позиции пера
Текущая позиция рисования,
с которой начинается рисование линий, называется позицией пера. Как вы
уже знаете, объект канвы хранит текущую позицию пера в свойстве PenPos
.
Позиция пера нужна только для рисования линий. Для рисования геометрических
фигур и вывода текста на канву вы указываете необходимые координаты при вызове
соответствующих методов. Для установки нужной позиции пера вызывайте метод MoveTo
:
Image1.Canvas.MoveTo(0,
0);
Данный код установит перо
в левый верхний угол канвы.
Примечание
Черчение линий с помощью метода
LineTo
также устанавливает текущую позицию, пера, равную конечной точке линии.