SetLineStyle (Type, Pattern, Thickness);

Здесь Type, Pattern и Thickness – переменные типа word.

Переменная Type может принимать пять значений, определяемых константами модуля Graph:

const

SolidLn = 0; (* Сплошная линия *)

DotteLn = 1; (* Точечная линия *)

CenterLn = 2; (* Штрихпунктирная линия *)

DasheLn = 3; (* Пунктирная линия *)

UserBitLn = 4; (* Узор линии определяет программист *)

Переменную Pattern (образец) используют, если задан тип UserBitLn, определяемый программистом. Параметр Pattern задаёт отрезок линии длиной в 16 пикселей, который периодически повторяется на протяжении всей линии. Каждый бит, приравненный к единице, соответствует светящемуся пикселу в этом отрезке линии.

Параметр Thickness может принимать одно из двух значений:

NormWidth =1; – толщина линии равна одному пикселю,

ThickWidth = 3; – толщина линии равна трём пикселям.

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

Процедура SetBkColor (color: word) модуля Graph устанавливает цвет фона, который по умолчанию чёрный. Переменная color может принимать 16 значений, определяемых константами цвета, входящими в модуль Graph:

Значение SetBkColor	Цвет	Значение SetBkColor	Цвет
Black = 0;	Черный	DarkGray = 8;	Тёмно-серый
Blue = 1;	Синий	LightBlue = 9;	Ярко-синий
Green = 2;	Зеленый	LightGreen = 10;	Ярко-зелёный
Cyan = 3;	Голубой	LightCyan = 11;	Ярко-голубой
Red = 4;	Красный	LightRed = 12;	Розовый
Magenta = 5;	Фиолетовый	LightMagenta = 13;	Малиновый
Brown = 6;	Коричневый	Yellow = 14;	Желтый
LightGray = 7;	Светло-серый	White = 15;	Белый

Процедура SetColor (color: word) модуля Graph устанавливает цвет, которым будет осуществляться рисование линий, точек и т.д.

Процедура Line (x1, y1, x2, y2: integer) модуля Graph рисует линию от точки с графическими координатами x1, y1 до точки с графическими координатами x2, y2. Линия вычерчивается текущим стилем и текущим цветом. Положение указателя после вывода линии остаётся неопределённым, т.е. не обязательно сохраняется в конечной точке x2, y2 линии.

Процедура LineRel (dx, dy: integer) модуля Graph рисует линию от текущего местоположения указателя к точке, заданной приращением графических координат dx и dy.

Процедура LineTo (x, y: integer) модуля Graph рисует линию от местоположения текущего указателя к точке с графическими координатами x, y.

2.4 Вывод прямоугольников и многоугольников

К многоугольникам относят замкнутые фигуры, образованные прямыми линиями и имеющие 3 и более углов. Наиболее часто встречаются фигуры в виде прямоугольников. Поэтому в модуле Graph предусмотрена специальная процедура Rectangle (x1, y1, x2, y2: integer), которая рисует прямоугольник с графическими координатами вершины x1, y1 до диагональной вершины с графическими координатами x2, y2., используя текущий цвет и тип линии.