Процедура 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)- стиль линии – сплошная, жирная.