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;

The index of the workspace object connecting point to which the end point of the connecting line that generated the OnAfterMoveCP event was joined, would be contained in the "i" variable after the execution of the event.

See also:

IAttachCPEventArgs