IGxRect.Intersect

Синтаксис

Intersect(Rect: IGxRect): IGxRect;

Параметры

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

Описание

Метод Intersect возвращает объект, содержащий целочисленный прямоугольник, являющийся результатом пересечения данного целочисленного прямоугольника с другим.

Пример

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

Var

Obj, Obj1: ITabObject;

Rect, Rect1, Rect2: IGxRect;

Begin

Rect:=New GxRect.Create(0,0,Math.RandBetweenI(10,60),Math.RandBetweenI(10,60));

Rect1:=New GxRect.Create(0,0,Math.RandBetweenI(0,40),Math.RandBetweenI(0,40));

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

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

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

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

Rect2:= Rect.Intersect(Rect1);

End Sub Button1OnClick;

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

См. также:

IGxRect