Управление экраном в графическом режиме, страница 2

          Процедура LineRel(dx, dy)вычерчивает линию от текущего положения указателя до положения, заданного приращениями его координат, dx, dy - выражения типа integer, задающие приращения координат до нового положения указателя.

          Процедура SetLineStyle (<вид>, <образец>, <толщина>) устанавливает новый стиль вычерчивания линии, <вид> - выражение типа word, определяющее вид линий: 0 – сплошная, 1 – точечная, 2 – штрихпунктирная, 3 – пунктирная, 4 – вид линии, определяемый пользователем; <образец> - выражение типа word, указывающее образец линий, <толщина> - выражение типа word, задающее толщину линии в пикселях, может принимать одно из двух значений: 1 – толщина один пиксель, 3 – толщина три пикселя.

          Процедура Rectangle (x1, y1, x2, y2) – вычерчивает прямоугольник с указанными координатами углов; x1, y1 - выражение типа word, задающее координаты левого верхнего угла; x2, y2 - выражение типа word, задающее координаты правого нижнего угла.

          Процедура Bar3D (x1, y1, x2, y2, <глубина>, <в. грань>)  вычерчивает трехмерное изображение параллелепипеда и закрашивает его переднюю грань; x1, y1 - выражения типа word, задающие координаты левого верхнего угла передней  грани; x2, y2 - выражения типа word, задающие координаты правого нижнего угла передней грани; <глубина> - выражение типа integer, задающее третье измерение трехмерного изображения в пикселях; <в. грань> - выражение типа boolean, задающее способ изображения верхней грани, если параметр имеет значение true, то верхняя грань параллелепипеда вычерчивается, в противном случае – нет.

          Процедура Circle (x, y) вычерчивает окружность; x, y, R - выражения типа integer, задающие координаты цента и радиус окружности в пикселях.

          Процедура Arc (x, y, <начальный угол>, <конечный угол>, R) вычерчивает дугу окружности; x, y, R - выражения типа integer, задающие координаты цента и радиус окружности в пикселях; <начальный угол>, <конечный угол> - выражения типа word, углы отсчитываются против часовой стрелки и указываются в градусах, нулевой угол соответствует горизонтальному направлению вектора слева на право, например, если задать начальный угол 0, а конечный 359, то будет вычерчена полная окружность.

          Процедура Ellipse (x, y, <начальный угол>, <конечный угол>, Rx, Ry) вычерчивает эллипсную дугу; x, y - выражения типа integer, задающие координаты цента; Rx, Ry - выражения типа word, определяющие вертикальный и горизонтальный радиус эллипса в пикселях; <начальный угол>, <конечный угол> - выражения типа word, задающие начальный и конечный углы в градусах.

          Процедура DrawPoly (N, <координаты>) вычерчивает произвольную ломанную линию, заданную координатами точек излома; N - выражение типа word, задающее количество точек излома, включая обе крайние точки; <координаты> - выражение типа PointType, содержащее координаты точек излома. Координаты точек  излома задаются парой значений типа word, первое определяет горизонтальную, второе – вертикальную координату.

          Процедура SetColor (<цвет>) устанавливает текущий цвет для выводимых линий и символов.

          Процедура SetBkColor (<цвет>) устанавливает цвет фона.

          Процедура SetFillStyle (<штриховка>, <цвет>) устанавливает стиль (тип и цвет) штриховки; <штриховка> - выражение типа word, определяющее тип штриховки; <цвет> - выражение типа word, определяющее цвет штриховки.

Таблица 2 – Коды типов штриховки

код

тип

код

тип

0

штриховка фоном

6

{утолщенные \\\\\\}

1

сплошная штриховка

7

{+++++}

2

штриховка линиями

8

{xxxxx}

3

{///////}

9

прямоугольная клеточка

4

{утолщенные /////}

10

редкие точки

5

{\\\\\\\}

11

частые точки

          Процедура FloodFill (x, y, <цвет границы>) штрихует произвольную замкнутую фигуру; x, y - выражения типа integer, задающие координаты любой точки внутри замкнутой фигуры. Процедура заштрихует замкнутую фигуру текущим образцом штриховки и текущим цветом, установленным в процедуре SetFillStyle.