ВУЗ:
Составители:
Рубрика:
40
40
Каждое двоичное число, записанное в одной строке матрицы, переведем в
шестнадцатеричное представление, а затем заполним этими значениями массив
Matr.
1 строка - 10101010 = $AA; 2 строка - 01010101 = $55. Все нечетные строки
совпадают с первой, а четные со второй.
Далее задаем:
Const
Matr: FillPatternType =($AA,$55, $AA,$55, $AA,$55, $AA,$55);
Представленный шаблон программисты называют заливка 50%.
Для определения текущего шаблона заливки используется процедура:
GetFillSetting(FillType). Переменная FillType
имеет тип FillSettingType,
определенный в модуле Graph.
Type
FillSettingType = Record
Pattern:word; { тип заливки или шаблон}
Color : word; { текущий цвет}
End;
2.2.8 Рисование залитых фигур
После задания типа заливки можно рисовать залитые фигуры.
FillEllipse (X, Y, Xrad, Yrad) - залитый эллипс. X, Y - координаты центра;
Xrad, Yrad - радиусы полуосей.
FillPoly(K, KoordXY) - рисование залитого замкнутого многоугольника.
Параметры те же, что в процедуре DrawPoly;
FloodFill(X, Y. CG) - заполнение любой замкнутой фигуры которой
принадлежит точка с координатами (X, Y) и контур которой нарисован цветом
CG. Заполнение производится в соответствии с установленным ранее типом
заливки.
Pieslice(X, Y, A1, A2, Rad) - рисование залитого кругового сектора с
центром (X, Y), радиуса Rad. A1, A2 - начальный и конечный углы сектора.
Sector(X, Y, A1, A2, Xrad, Yrad) - рисование залитого эллиптического
сектора с центром (X, Y), радиусами полуосей Xrad, Yrad. A1, A2 - начальный и
конечный углы сектора.
Bar (X1, Y1, X2, Y2) - залитый прямоугольник. X1, Y1, X2, Y2 -
координаты верхнего левого
и правого нижнего углов прямоугольника.
Bar3D (X1, Y1, X2, Y2, D, Top) - рисует параллелепипед, лицевая сторона
которого заливается по текущему шаблону; D - глубина параллелепипеда.
Параметр Top задает режим отображения верхней плоскости
параллелепипеда (True - отображать, False - не отображать).
В модуле Graph определены две константы для задания параметра Top:
Const
TopOn = True;
TopOff = False.
40 Каждое двоичное число, записанное в одной строке матрицы, переведем в шестнадцатеричное представление, а затем заполним этими значениями массив Matr. 1 строка - 10101010 = $AA; 2 строка - 01010101 = $55. Все нечетные строки совпадают с первой, а четные со второй. Далее задаем: Const Matr: FillPatternType =($AA,$55, $AA,$55, $AA,$55, $AA,$55); Представленный шаблон программисты называют заливка 50%. Для определения текущего шаблона заливки используется процедура: GetFillSetting(FillType). Переменная FillType имеет тип FillSettingType, определенный в модуле Graph. Type FillSettingType = Record Pattern:word; { тип заливки или шаблон} Color : word; { текущий цвет} End; 2.2.8 Рисование залитых фигур После задания типа заливки можно рисовать залитые фигуры. FillEllipse (X, Y, Xrad, Yrad) - залитый эллипс. X, Y - координаты центра; Xrad, Yrad - радиусы полуосей. FillPoly(K, KoordXY) - рисование залитого замкнутого многоугольника. Параметры те же, что в процедуре DrawPoly; FloodFill(X, Y. CG) - заполнение любой замкнутой фигуры которой принадлежит точка с координатами (X, Y) и контур которой нарисован цветом CG. Заполнение производится в соответствии с установленным ранее типом заливки. Pieslice(X, Y, A1, A2, Rad) - рисование залитого кругового сектора с центром (X, Y), радиуса Rad. A1, A2 - начальный и конечный углы сектора. Sector(X, Y, A1, A2, Xrad, Yrad) - рисование залитого эллиптического сектора с центром (X, Y), радиусами полуосей Xrad, Yrad. A1, A2 - начальный и конечный углы сектора. Bar (X1, Y1, X2, Y2) - залитый прямоугольник. X1, Y1, X2, Y2 - координаты верхнего левого и правого нижнего углов прямоугольника. Bar3D (X1, Y1, X2, Y2, D, Top) - рисует параллелепипед, лицевая сторона которого заливается по текущему шаблону; D - глубина параллелепипеда. Параметр Top задает режим отображения верхней плоскости параллелепипеда (True - отображать, False - не отображать). В модуле Graph определены две константы для задания параметра Top: Const TopOn = True; TopOff = False. 40
Страницы
- « первая
- ‹ предыдущая
- …
- 38
- 39
- 40
- 41
- 42
- …
- следующая ›
- последняя »