Shape: IWxShape;
The Shape property returns the workspace object, connecting line, the end point of which is shifted.
Sub WorkspaceBox1OnBeforeMoveCP(Sender: Object; Args: IMoveCPEventArgs);
Var
s: String;
Begin
s := Args.Shape.Id;
End Sub WorkspaceBox1OnBeforeMoveCP;
After executing the event the identifier of the connecting line, which end point is planned to be shifted, is contained in the "s" variable.
See also: