Intersect(Rect: IGxRectF): IGxRectF;
Rect — прямоугольник, с которым производится пересечение.
Метод Intersect возвращает объект, содержащий вещественный прямоугольник, являющийся результатом пересечения данного вещественного прямоугольника с другим.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Obj, Obj1: ITabObject;
RectF, RectF1, RectF2: IGxRectF;
Begin
RectF:=New GxRectF.Create(0,0,Math.RandBetween(10,60.6),Math.RandBetween(10,60.36));
RectF1:=New GxRectF.Create(0,0,Math.RandBetween(0,40),Math.RandBetween(0,40));
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");
RectF2:= RectF.Intersect(RectF1);
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку на регламентном отчете будут созданы два изображение. Источники изображений - файлы «1.bmp» и «2.bmp». В переменной «RectF2» будет содержаться вещественный прямоугольник, являющийся результатом пересечения прямоугольников, ограничивающих изображения.
См. также: