Right: Integer;
Свойство Right определяет правую границу целочисленного прямоугольника.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Obj: ITabObject;
Rect: IGxRect;
Begin
Rect:=New GxRect.Create(0,0,10,10);
Obj:=UiTabSheet1.TabSheet.Objects.Add("PrxPicture", Rect.ToRectF);
(Obj As IPrxPicture).Image:=GxImage.FromFile("c:\1.bmp");
Rect.Bottom:=23;
Rect.Right:=30;
Obj.Rectangle:=Rect.ToRectF;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку на регламентном отчете будет создано изображение. Источник изображения - файл «1.bmp». Изображение будет создано в верхнем левом углу, нижняя граница будет сдвинуто вниз на «23», правая - вправо на «30».
См. также: