Reduce(DX: Integer, DY: Integer);
DX. Смещение по ширине.
DY. Смещение по высоте.
Метод Reduce осуществляет уменьшение текущего размера.
Размер задается значениями целочисленного типа.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Size: IGxSize;
Rect: IWxRectangle;
Begin
Size:=New GxSize.Create(10,10);
Rect:=UiWorkspace1.WxWorkspace.CreateRectangle;
Rect.BeginUpdate;
Size.Reduce(40,45);
Rect.Size:=New GxSizeF.CreateFromSize(Size.ToSizeF);
Rect.EndUpdate;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку на рабочем пространстве будет создан прямоугольник и его размеры будут уменьшены на 40 по ширине и на 45 по высоте.
См. также: