BorlanD Russian Сommunity

Изучим класс TPen. Класс TPen отвечает за перо. Оно, как и описанная в предыдущем уроке кисть, относится к холсту (Canvas). Перо предназначено для рисования различных линий. У него существует цвет (свойство Color), вид (сплошное, пунктирное и т. д. - свойство Style), ширина (свойство Width), режим отображения (свойство Mode).

 

Вот пример использования пера:

 

            //Задаем перо синего цвета

            Form1.Canvas.Pen.Color:=RGB(0, 0, 255);

            Form1.Canvas.MoveTo(10, 12);

            Form1.Canvas.LineTo(70, 12);

            //Задаем штрих-пунктирное перо

            Form1.Canvas.Pen.Style:=psDashDot;

            Form1.Canvas.MoveTo(10, 22);

            Form1.Canvas.LineTo(70, 22);

            //Задаем толстое перо

            Form1.Canvas.Pen.Width:=6;

            Form1.Canvas.MoveTo(10, 32);

            Form1.Canvas.LineTo(70, 32);

            //Задаем режим отображения

            Form1.Canvas.Pen.Mode:=pmMask;

            Form1.Canvas.MoveTo(10, 42);

            Form1.Canvas.LineTo(70, 42);

 

Наши линии мы наложили на рисунок из прошлого урока. Обратите внимание, что до смены режима отображения линия полностью непрозрачна, после же мы частично видим рисунок под линией. Еще возможные значения для режима отображения - pmNot (с конвертацией цветов), pmMerge и другие.

Всё на этом урок закончен.

Просмотров: 777 | Категория: Delphi 7 | Дата: 11.05.2008