IGxSize.Equals

Синтаксис

Equals(Size: IGxSize): Boolean;

Параметры

Size. Размер, с которым производится сравнение.

Описание

Метод Equals проверяет равенство данного размера с размером, передаваемым в качестве параметра Size.

Комментарии

Размер задается значениями целочисленного типа.

Пример

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

Var

Size, Size1: IGxSize;

Rect, Rect1: IWxRectangle;

s: String;

Begin

Size:=New GxSize.Create(0,0);

Size1:=New GxSize.Create(0,0);

Rect:=UiWorkspace1.WxWorkspace.CreateRectangle;

Rect1:=UiWorkspace1.WxWorkspace.CreateRectangle;

Size.Width:=Math.RandBetweenI(0,50);

Size1.Width:=Math.RandBetweenI(0,50);

Size.Height:=Math.RandBetweenI(0,50);

Size1.Height:=Math.RandBetweenI(0,50);

Rect.BeginUpdate;

Rect1.BeginUpdate;

Rect.Size:=New GxSizeF.CreateFromSize(Size.ToSizeF);

Rect1.Size:=New GxSizeF.CreateFromSize(Size1.ToSizeF);

Rect.EndUpdate;

Rect1.EndUpdate;

If Size.Equals(Size1) Then

s:="Yes";

Else

s:="No";

End If;

End Sub Button1OnClick;

После выполнения примера при нажатии на кнопку на рабочем пространстве будут созданы два прямоугольника и в переменной «s» будет содержаться «Yes» если их размеры совпадают.

См. также:

IGxSize