IWxSmoothBaloon.RelativePointPosition

Синтаксис

RelativePointPosition: IGxPointF;

RelativePointPosition: Prognoz.Platform.Interop.Drawing.IGxPointF;

Описание

Свойство RelativePointPosition определяет положение точки выноски относительно центра фигуры.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента WorkspaceBox и компонента UiWorkspace с наименованием «UiWorkspace1», являющимся источником данных для WorkspaceBox.

Добавьте ссылки на системные сборки: Andy, Drawing, Workspace.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    WS: IWxWorkspace;
    Rect: IWxRectangleBaloon;
Begin
    WS := UiWorkspace1.WxWorkspace;
    WS.BeginUpdate;
    Rect := WS.CreateRectangleBaloon;
    Rect.RelativePointPosition := New GxPointF.Create(02);
    WS.EndUpdate;
End Sub Button1OnClick;
Imports Prognoz.Platform.Interop.Andy;
Imports Prognoz.Platform.Interop.Drawing;
Imports Prognoz.Platform.Interop.Workspace;

 
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    WS: IWxWorkspace;
    Rect: IWxRectangleBaloon;
    PinPoint: GxPointF = 
New GxPointFClass();
Begin
    WS := uiWorkspaceNet1.WxWorkspace;
    WS.BeginUpdate();
    Rect := WS.CreateRectangleBaloon();
    PinPoint.Create(
02);
    Rect.RelativePointPosition := PinPoint;
    WS.EndUpdate();
End Sub;

После выполнения примера на рабочем пространстве будет создана прямоугольная выноска. Выноска будет смещена относительно центра фигуры. Пример обычной фигуры (слева) и фигуры со смещенной выноской (справа) приведен ниже:

См. также:

IWxSmoothBaloon