IGxRectF.Equals

Синтаксис

Equals(Rect: IGxRectF): Boolean;

Параметры

Rect — вещественный прямоугольник, с которым производится сравнение.

Описание

Метод Equals проверяет равенство данного вещественного прямоугольника с прямоугольником, передаваемым посредством параметра Rect.

Пример

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

Var

Obj, Obj1: ITabObject;

RectF, RectF1: IGxRectF;

s: String;

Begin

RectF:=New GxRectF.Create(0,0,Math.RandBetween(0,10),Math.RandBetween(0,10));

RectF1:=New GxRectF.Create(0,0,Math.RandBetween(0,10),Math.RandBetween(0,10));

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

Obj1:=UiTabSheet1.TabSheet.Objects.Add("PrxPicture", RectF1);

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

(Obj1 As IPrxPicture).Image:=GxImage.FromFile("c:\2.bmp");

If RectF.Equals(RectF1) Then

s:="Yes";

Else

s:="No";

End If;

End Sub Button1OnClick;

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

См. также:

IGxRectF