ContainsP(Point: IGxPoint): Boolean;
Point — точка, которую необходимо проверить.
Метод ContainsP возвращает True, если точка, передаваемая посредством параметра Point, содержится в целочисленном прямоугольнике.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Obj: ITabObject;
Rect: IGxRect;
Point: IGxPoint;
s: String;
Begin
Rect:=New GxRect.Create(0,0,50,45);
Point:=New GxPoint.Create(Math.RandBetweenI(0,70),Math.RandBetweenI(0,70));
Obj:=UiTabSheet1.TabSheet.Objects.Add("PrxPicture", Rect.ToRectF);
(Obj As IPrxPicture).Image:=GxImage.FromFile("c:\1.bmp");
If Rect.ContainsP(Point) Then
s:="Yes";
Else
s:="No";
End If;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку на регламентном отчете будет создано изображение. Источник изображения - файл «1.bmp». В переменной «S» будет содержаться «Yes» если точка со случаными координатами входит в прямоугольник, ограничивающий изображение.
См. также: