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