GetShapeByPt(Pt: IGxPoint): IWxShape;
GetShapeByPt(Pt: Prognoz.Platform.Interop.Drawing.GxPoint): Prognoz.Platform.Interop.Andy.IWxShape;
Pt. Координаты точки, находящейся в пределах фигуры, информацию о которой необходимо получить.
Метод GetShapeByPt позволяет получить информацию о фигуре по экранным координатам точки, которая находится в пределах фигуры.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонентов UiEtlObject с наименованием «UiEtlObject1» и EtlBox с наименованием «EtlBox1». «UiEtlObject1» установлен в качестве источника для «EtlBox1». К «UiEtlObject1» подключена какая-либо задача ETL. Подключите системную сборку Drawing.
Sub EtlBox1OnMouseDown(Sender: Object; Args: IMouseClickEventArgs);
Var
Pt: IGxPoint;
Shape: IWxShape;
Begin
Pt := Args.pPoint As IGxPoint;
Shape := EtlBox1.GetShapeByPt(Pt);
If Shape <> Null Then
Self.Text := Shape.Id;
End If;
End Sub EtlBox1OnMouseDown;
При наведении курсора на рабочую область задачи ETL и щелчке мышью, если курсор был наведен на какую-либо фигуру, то в заголовок формы будет выведен идентификатор этой фигуры.
См. также: