IWxLink.RemovePoint

Синтаксис

RemovePoint(Number: Integer);

Параметры

Number - индекс точки.

Описание

Метод RemovePoint удаляет точку линии по заданному индексу.

Пример

В рассматриваемом примере предполагается существование объекта ws типа IWxWorkspace.

Sub UserProc;

Var

ws: IWxWorkspace;

Link : IWxLink;

Begin

Link := ws.Shapes.Item(2) As IWxLink;

Link.RemovePoint(Link.PointCount-2);

End Sub UserProc;

После выполнения примера будет удалена предпоследняя точка линии.

См. также:

IWxLink