PointCount: Integer;
Свойство PointCount определяет количество точек на выноске.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента WorkspaceBox и компонента UiWorkspace с наименованием «UiWorkspace1», являющимся источником данных для WorkspaceBox.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
WS: IWxWorkspace;
Rect: IWxLinkedBaloon;
Begin
WS := UiWorkspace1.WxWorkspace;
WS.BeginUpdate;
Rect := WS.CreateLinkedBaloon;
Rect.PointCount := 4;
WS.EndUpdate;
End Sub Button1OnClick;
После выполнения примера на рабочем пространстве будет создана выноска с четырьмя точками:

См. также: