IAttachCPEventArgs.CPIndexToAttach

Syntax

CPIndexToAttach: Integer;

Description

The CPIndexToAttach property returns the index of the object workspace connecting point, to which the end point of the connecting line was joined after the shift.

Example

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

Var

i: Integer;

Begin

If Args.ShapeToAttach <> Null Then

i := Args.CPIndexToAttach;

End If;

End Sub WorkspaceBox1OnAfterMoveCP;

After executing the event the index of the workspace object connecting point, to which the end point of the connecting line that generated the OnAfterMoveCP event was joined, will be contained in the "i" variable.