Основы применения вычислительной техники и программирование. Беспалов В.В. - 81 стр.

UptoLike

Составители: 

ных стилей, то значение b равно 0. Если пользователь хочет активизи-
ровать собственный стиль, то значение
b равно 4. В этом случае пользо-
ватель сам указывает примитив (образец), из которого строится линия.
Например:
SetLineStyle(1,0,1);
Line(15,15,150,130);
или
$5555,ThickWidth);
Таблица 10.2
К ние
SetLineStyle(UserBitLn,
Line(15,15,150,130);
10.4.4. Стандартные типы и толщина линий
онстанта Значение Описа
SolidLn 0 Непрерывная линия
DottedLn 1 Линия из точек
Cen Линия из точек иterLn 2 тире
DashedLn 3 Штриховая линия
UserBitLn 4 Тип пользователя
Таблица 10.3
Константа Значение Описание
NormWidth 1 Нормальная толщина (1 пиксель)
ThickWidth 3 Жирная линия (3 пикселя)
10.4.5. Построени рямоу
ля построения прямоугольных фигур имеется несколько проце-
дур. Первая из нихвычерчивание одномерного прямоугольника:
Rect
Здесь
ника
Цвет
;a:boolean);
е п гольников
Д
angle(x1,y1,x2,y2:integer);
x1,y1
координаты левого верхнего угла, x2,y2координаты
правого нижнего угла прямоугольника. Область внутри прямоуголь
не закрашена и совпадает по цвету с фоном.
Более эффектные для восприятия прямоугольники можно строить
с помощью процедуры, которая рисует закрашенный прямоугольник:
Bar(x1,y1,x2,y2:integer);
закраски устанавливается с помощью SetFillStyle. Еще одна
эффектная процедура
Bar3D(x1,y1,x2,y2,d:integer
82