Отображение отрезков прямых линий

Процедура Line(X1,Y1,X2,Y2:integer); выводит на экран отрезок прямой линии. Здесь X1,Y1 – координаты начальной точки, а X2,Y2 – координаты конечной точки отрезка.

Для построения отрезков можно применять также следующие процедуры:

LineTo(X,Y); – проводит отрезок из текущей точки до точки с координатой (X,Y);

LineRel(dX,dY); – проводит отрезок из текущей точки до точки, удаленной от нее на расстояние (dX,dY). Линии можно вычерчивать самых различных стилей: тонкие, широкие, штриховые, пунктирные и т.д.

Процедура SetLineStyle(<тип линии>:word;<узор(шаблон)>:word;<толщина линии>:word); производит установку стиля.

Таблица 3. Константы типа линий и их толщины

Константа Значение Характеристика линии
SolidLn DottedLn CenterLn DashedLn UserBitLn Сплошная линия Точечная линия Штрихпунктирная линия Пунктирная линия Тип линии, определяемый пользователем
NormWidth ThickWidth Нормальная толщина линии Жирная линия

Если тип линии не равен UserBitLn, то параметр “узор(шаблон)” не используется и обычно задается равным нулю, например SetLineStyle(0,0,3)- стиль линии – сплошная, жирная.