Изменение параметров кисти. Рисование линий и прямоугольника

Кисть (canvas.Brush) используется методами, обеспечивающими вычерчивание замкнутых областей, например геометрических фигур, для заливки (закрашивания) этих областей.

· color — так же как и у карандаша, у кисти тоже может быть свой цвет.

· Handle — такой же указатель, как и у карандаша, но на кисть.

· style—стиль фона. Здесь могут быть следующие значения: bsSolid, bsciear, bsHorizontal, bsVertical, bsFDiagonal, bsBDiagonal, bsCross, bsDiagCross.

Ha рис. 12.5 вы можете увидеть графическое отображение каждого из стилей. Теперь перейдем к практической части работы с кистью и напишем небольшой

Элементы окружности и эллипса в Delphi.

Метод Ellipse вычерчивает эллипс или окружность, в зависимости от значений параметров. Инструкция вызова метода в общем виде выглядит следующим образом:

Объект.Canvas.Ellipse(x1,y1, х2,у2]

где:

• объект — имя объекта (компонента), на поверхности которого выполняется вычерчивание;
• x1, y1, х2, у2 — координаты прямоугольника, внутри которого вычерчивается эллипс или, если прямоугольник является квадратом, окружность (рис. 10.6).

Рис. 10.6. Значения параметров метода Ellipse определяют вид геометрической фигуры

Цвет, толщина и стиль линии эллипса определяются значениями свойства Реп, а цвет и стиль заливки области внутри эллипса — значениями свойства Brush поверхности (canvas), на которую выполняется вывод.

Рисование закрашенных фигур в Delphi.

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

Инструменты рисования
В Delphi существует два объекта, с помощью которых происходит рисование:
1. Pen(перо).
2. Brush(кисть).
Пером рисуются линии, а кистью происходит закрашивание внутренностей полых фигур.

Рисование линии
Для рисования линии необходимо проделать два шага:
1. Поставить перо в начальную точку.
2. Провести линию до конечной точки
Стоит обратить внимание на то, что после рисования линии перо остается в конечной точке.
Рассмотрим методы для осуществления этих действий:
Canvas.MoveTo(x,y)- данный метод устанавливает перо в точку с координатами (x, y), не рисуя при этом никаких линий.
Canvas.LineTo(x,y) – данный метод рисует линию из точки в которой находится перо, в новую точку с координатами (x, y).
Пример: (допустим наша форма называется Fmain)
Begin
Fmain.Canvas.MoveTo(10, 20);//ставим перо в начало линии
Fmain.Canvas.LineTo(50, 80);//рисуем линию
End: