Deflate(DX: Integer; DY: Integer);
DX. Изменение по ширине.
DY. Изменение по высоте.
Метод Deflate осуществляет уменьшение размеров целочисленного прямоугольника на указанные значения по ширине и по высоте.
Sub UserProc;
Var
Rect: IGxRect;
Begin
Rect := New GxRect.Create(0, 0, Math.RandBetweenI(0, 60), Math.RandBetweenI(0, 60));
Rect.Deflate(10, 10);
Debug.WriteLine("Новая ширина: " + Rect.Width.ToString + ". Новая высота: " + Rect.Height.ToString);
End Sub UserProc;
При выполнении примера будет создан прямоугольник случайного размера. Затем прямоугольник будет уменьшен в размерах. Полученные ширина и высота прямоугольника будут выведены в консоль среды разработки.
См. также: