16.4.2. Процедура Ваr
procedure Bar(XI, Yl, Х2, Y2: Integer);
Строит прямоугольник, закрашенный текущим орнаментом и цветом заполнения. Орнамент и цвет заполнения задаются процедурой SetFillStyle или SetFillPattern. Применяется только в графическом режиме.
XI, Yl, X2, Y2 - координаты левого верхнего и правого нижнего углов прямоугольника.
|
