Дополнительные процедуры и функции модуля Graph

Функция

Смысл

GetMaxX :Integer

Выдает максимально возможную горизонтальную координату экрана

GetMaxY :Integer

Выдает максимально возможную вертикальную координату экрана

GetPixel(x,y :Integer) :Word

Выдает номер цвета пиксела с координатами x и y.

Процедура

Смысл

Arc (x,y :Integer; fi1,fi2,r :Word)

Рисует дугу окружности с центром в точке x,y  и радиусом r. Дуга начинается от угла fi1 градусов и кончается углом fi2 градусов.

PieSlice (x,y :Integer; fi1,fi2,r :Word)

Закрашенный сектор круга. Дуга сектора определяется так же, как в процедуре Arc. Цвет и стиль заливки определяются процедурой SetFillStyle.

FillEllipse (x,y :Integer;  rx,ry :Word)

Закрашенный эллипс с центром в точке x,y  и радиусами rx,ry. Цвет и стиль заливки определяются процедурой SetFillStyle.

Sector (x,y :Integer; fi1,fi2,rx,ry :Word)

Закрашенный сектор эллипса. Опирается на дугу эллипса с центром в точке x,y  и радиусами rx,ry. Дуга начинается от угла fi1 градусов и кончается углом fi2 градусов.

Bar (x1,y1, x2,y2:Integer)

Закрашенный прямоугольник с противоположными углами в точках (x1,y1) и (x2,y2)

Bar3D (x1,y1, x2,y2:Integer; tol:Word; top:Boolean)

Трехмерный параллелепипед, обращенный к нам прямоугольной гранью с противоположными углами в точках (x1,y1) и (x2,y2). Толщина параллелепипеда – tol. Если top равно TopOff, то параллелепипед – без верха, если top равно TopOn, то – с верхом.