Установка стиля линии
Turbo
Pascal позволяет вычерчивать линии
самого различного стиля: тонкие, широкие,
пунктирные, штриховые и т.д. Установка
стиля производится процедурой
SetLineStyle(
Style, Pattern, Thickness ),
где Style –
параметр, определяющий стиль линии.
Возможные значения этого параметра
приведены в таблице 3; Pattern
– образец; Thickness – толщина
линии. Если применяется один из стандартных
стилей, значение параметра Pattern должно
быть равно 0.
Таблица
3
Стили линии.
Описание
стиля
|
Константа
|
Сплошная
линия
|
SolidLn
= 0
|
Точечная
линия
|
DottedLn
= 1
|
Штрих-пунктирная
линия
|
CenterLn
= 2
|
Пунктирная
линия
|
DashedLn
= 3
|
Стиль,
определяемый
пользователем
|
UserBitLn
= 4
|
Параметр Thickness может
принимать всего два значения:
NormWidth
= 1 – линия толщиной в один
пиксел
ThickWidth = 3 – линия толщиной
в три пиксела
Практическая часть