16.4.37. Процедура Rectangle
procedure Rectangle(Xl, Yl, X2, Y2: Integer);
Строит контур прямоугольника текущим цветом. Цвет задается процедурой SetColor, текущие параметры линии - процедурой SetLineStyle, а режим построения линии - процедурой SetWriteMode. Применяется только в графическом режиме.
X1, Y1 - координаты левого верхнего угла прямоугольника;
Х2, Y2 - координаты правого нижнего угла прямоугольника (необходимо, чтобы 0 <= X1 < Х2 <= GetMaxX и 0 <=Yl < Y2 <= GetMaxY).
|