12.Графические процедуры и функции. Графические объекты.

Графические объекты предназначены для отображения рисунков или графических примитивов.

Вкладка Additional

Image – образ

Shape – фигура

Свойство Shape:

shpRis.Shape:=stCircle;

stCircle — круг

stEllipse — эллипс

stRectangle — прямоугольник

stRoundRect — прямоугольник со скругленными концами

stRoundSquare — квадрат со скругленными концами

stSquare — квадрат

Вкладка System

PaintBox – картинка

Canvas – холст для рисования

Рисование производится:

1.Пером (Pen) - контур

свойства:

Color – цвет пера;

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

Mode – режим рисования линий;

imgGrafic.Canvas.Pen.Mode:= pmBlack;

Style – стиль рисования линий;

imgGrafic.Canvas.Pen.Style:= psSolid;

psSolid - Сплошная линия

psDash - Штриховая линия

psDot - Пунктирная линия

psDashDot - Штрих-пунктирная линия

psDashDotDot - Линия, чередующая штрих и два пунктира

psClear - Отсутствие линии

psInsideFrame - Сплошная линия, но при Width > 1 допускающая цвета, отличные от палитры Windows

2.Кистью (Brush) для закраски фона.

imgGrafic.Canvas.Brush.Color:=RGB(255,255,255);

Style – стиль закраски;

Свойство Style определяет шаблон, которым кисть заполняет фон объекта. Но если для кисти задано свойство Bitmap, то свойство Style игнорируется.

imgGrafic.Canvas.Brush.Style:=bsSolid;

Возможные значения свойства Style:

Значение Шаблон

bsSolid – сплошная;

bsCross – решеточка;

bsClear – прозрачная;

bsDiagCross – сеточка;

bsBDiagonal – диагональ справа налево;

bsHorizontal – горизонтальные линии;

bsFDiagonal – диагональ слева направо;

bsVertical – вертикальные линии;

Графические процедуры и функции:

1 Группа:

1.Метод MoveTo изменяет текущую позицию пера PenPos на заданную точкой (X, Y). Это эквивалентно непосредственной установке свойства PenPos. При перемещении пера методом MoveTo ничего не рисуется.

ImgGrafic.Canvas.MoveTo(X1,Y1);

2.Метод LineTo рисует на канве прямую линию, начинающуюся с текущей позиции пера PenPos и кончающуюся точкой (X, Y), исключая саму точку (X, Y). Текущая позиция пера PenPos перемещается в точку (X, Y). При рисовании используются текущие установки пера Pen.

Операторы

ImgGrafic.Canvas.MoveTo(X1,Y1);

ImgGrafic.Canvas.LineTo(X2,Y2);

ImgGrafic.Canvas.LineTo(X3,Y3);

рисуют кусочно-ломаную прямую, соединяющую точки (X1,Y1), (X2,Y2) и (X3,Y3).

3.Метод Rectangle рисует на канве текущим пером Pen прямоугольник, верхний левый угол которого имеет координаты (X1, Y1), а нижний правый - (X2, Y2). Прямоугольник закрашивается текущей кистью Brush.

Рисование прямоугольника без рамки можно осуществить методом FillRect. Прямоугольник со скругленными углами рисуется методом RoundRect. Прямоугольник без внутренней закраски рисуется методом FrameRect.

ImgGrafic.Canvas.Rectangle(10,10,210,110);

4. Метод FrameRect рисует на канве прямоугольную рамку вокруг области Rect, используя установку текущей кисти Brush. Толщина рамки - 1 пиксель. Область внутри рамки кистью не заполняется. Отличается от метода Rectangle тем, что рамка рисуется цветом кисти (в методе Rectangle - цветом пера Pen) и область не закрашивается (в методе Rectangle закрашивается).

Оператор

ImgGrafic.Canvas.Brush.Color = clBlack;

ImgGrafic.Canvas.FrameRect(Rect(10,10,100,100));

рисует на канве компонента ImgGrafic черную рамку.

5.Метод Ellipse рисует окружность или эллипс с помощью текущих параметров пера Pen. Фигура заполняется текущим значением Brush. Точки (X1, Y1) и (X2, Y2) определяют прямоугольник, описывающий эллипс.