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