IGxRectF.IsEmpty

Синтаксис

IsEmpty: Boolean;

Описание

Свойство IsEmpty возвращает True если все границы вещественного прямоугольника нулевые.

Пример

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

Obj: ITabObject;

RectF: IGxRectF;

s: String;

Begin

RectF:=New GxRectF.Create(0,0,1,1);

Obj:=UiTabSheet1.TabSheet.Objects.Add("PrxPicture", RectF);

(Obj As IPrxPicture).Image:=GxImage.FromFile("c:\1.bmp");

RectF.Width:=Math.RandBetween(0,15.5);

RectF.Height:=Math.RandBetween(0,15.5);

Obj.Rectangle:=RectF;

If RectF.IsEmpty Then

s:="Yes";

Else

s:="No";

End If;

End Sub Button1OnClick;

После выполнения примера при нажатии на кнопку на регламентном отчете будет создано изображение. Источник изображения - файл «1.bmp». В переменной «S» будет содержаться «Yes» если границы прямоугольника, ограничивающего изображение, нулевые.

См. также:

IGxRectF