Алгоритмические языки и программирование. Часть 3. Модули в Турбо Паскале. Игошина Л.В. - 40 стр.

UptoLike

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

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