IAttachCPEventArgs.CPIndexToAttach

Синтаксис

CPIndexToAttach: Integer;

Описание

Свойство CPIndexToAttach возвращает индекс соединительной точки объекта рабочего пространства, к которой была присоединена конечная точка соединительной линии после перемещения.

Пример

Sub WorkspaceBox1OnAfterMoveCP(Sender: Object; Args: IAttachCPEventArgs);

Var

i: Integer;

Begin

If Args.ShapeToAttach <> Null Then

i := Args.CPIndexToAttach;

End If;

End Sub WorkspaceBox1OnAfterMoveCP;

После выполнения события в переменной "i" будет содержаться индекс соединительной точки объекта рабочего пространства, к которой была присоединена конечная точка соединительной линии, сгенерировавшей событие OnAfterMoveCP.

См. также:

IAttachCPEventArgs