12.7 Процедуры построения криволинейных фигур

Circle ( x, y : Integer; Radius : Word ) ;

—

строит окружность текущим цветом с учетом масштабов по осям.

x, y —

координаты центра окружности.

Radius —

радиус окружности (в пикселях).

Цвет задается процедурой SetColor, текущие параметры линии — процедуройSetLineStyle, изменение относительных масштабов изображения по вертикали и горизонтали — процедуройSetAspectRatio.

Arc ( x, y : Integer; StAngle, EndAngle, Radius : Word ) ;

—

строит дугу окружности текущим цветом с учетом масштабов по осям (если StAngle=0,EndAngle=359, то результат работы будет таким же, как и результат процедурыCircle).

x, y —

координаты центра дуги.

StAngle—

угол до начальной точки дуги, отсчитываемый против часовой стрелки от горизонтальной оси, направленной слева направо.

EndAngle—

угол до конечной точки дуги, отсчитываемый так же.

Radius —

радиус дуги (в пикселях).

Цвет задается процедурой SetColor, текущие параметры линии — процедуройSetLineStyle, изменение относительных масштабов изображения по вертикали и горизонтали — процедуройSetAspectRatio.

Ellipse ( x, y : Integer; StAngle, EndAngle, XRadius, YRadius : Word ) ;

—

строит дугу эллипса текущим цветом (если StAngle=0,EndAngle=359, то будет построен эллипс).

x, y —

координаты центра эллипса.

StAngle—

угол до начальной точки эллипса, отсчитываемый против часовой стрелки от горизонтальной оси, направленной слева направо.

EndAngle—

угол до конечной точки эллипса, отсчитываемый так же.

XRadius, YRadius —

горизонтальная и вертикальная полуоси эллипса (в пикселях).

Цвет задается процедурой SetColor, текущие параметры линии — процедуройSetLineStyle, изменение относительных масштабов изображения по вертикали и горизонтали — процедуройSetAspectRatio.

FillEllips ( x, y : Integer; XRadius, YRadius : Word ) ;

—

строит эллипс, закрашенный текущим орнаментом и цветом заполнения.

x, y —

координаты центра эллипса.

XRadius, YRadius —

горизонтальная и вертикальная полуоси эллипса (в пикселях).

Цвет контура задается процедурой SetColor, текущие параметры линии — процедуройSetLineStyle, изменение относительных масштабов изображения по вертикали и горизонтали — процедуройSetAspectRatio, орнамент и цвет заполнения задаются процедуройSetFillStyleилиSetFillPattern.

PieSlice ( x, y : Integer; StAngle, EndAngle, Radius : Word ) ;

—

строит сектор круга, закрашенный текущим орнаментом и цветом заполнения, с учетом масштабов по осям.

x, y —

координаты центра сектора круга.

StAngle—

начальный угол сектора, отсчитываемый против часовой стрелки от горизонтальной оси, направленной слева направо.

EndAngle—

конечный угол сектора, отсчитываемый так же.

Radius —

радиус сектора (в пикселях).

Цвет контура задается процедурой SetColor, текущие параметры линии — процедуройSetLineStyle, изменение относительных масштабов изображения по вертикали и горизонтали — процедуройSetAspectRatio, орнамент и цвет заполнения задаются процедуройSetFillStyleилиSetFillPattern.

В случае аварийной ситуации (во время закрашивания фигуры) процедура устанавливает код ошибки: -6.

Sector ( x, y : Integer; StAngle, EndAngle, XRadius, YRadius : Word ) ;

—

строит сектор эллипса, закрашенный текущим орнаментом и цветом заполнения.

x, y —

координаты центра сектора эллипса.

StAngle—

начальный угол сектора, отсчитываемый против часовой стрелки от горизонтальной оси, направленной слева направо.

EndAngle—

конечный угол сектора, отсчитываемый так же.

XRadius, YRadius —

горизонтальная и вертикальная полуоси эллипса (в пикселях).

Цвет контура задается процедурой SetColor, текущие параметры линии — процедуройSetLineStyle, изменение относительных масштабов изображения по вертикали и горизонтали — процедуройSetAspectRatio, орнамент и цвет заполнения задаются процедуройSetFillStyleилиSetFillPattern.

В случае аварийной ситуации (во время закрашивания фигуры) процедура устанавливает код ошибки: -6.