Deflate(DX: Double; DY: Double);
DX. Смещение по ширине.
DY. Смещение по высоте.
Метод Deflate осуществляет уменьшение размера вещественного прямоугольника на DX по ширине и на DY по высоте.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Obj: ITabObject;
RectF: IGxRectF;
Begin
RectF:=New GxRectF.Create(0,0,Math.RandBetween(0,60.6),Math.RandBetween(0,60.36));
Obj:=UiTabSheet1.TabSheet.Objects.Add("PrxPicture", RectF);
(Obj As IPrxPicture).Image:=GxImage.FromFile("c:\1.bmp");
RectF.Deflate(10.5,13.6);
Obj.Rectangle:=RectF;
End Sub Button1OnClick;
После выполнения примера, при нажатии на кнопку, на регламентном отчете будет создано изображение. Источник изображения - файл «1.bmp». Изображение будет создано со случайным размером и уменьшено на «10.5» по ширине и на «13.6» по высоте.
См. также: