IMoveCPEventArgs.Shape

Синтаксис

Shape: IWxShape;

Описание

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

Пример

Sub WorkspaceBox1OnBeforeMoveCP(Sender: Object; Args: IMoveCPEventArgs);

Var

s: String;

Begin

s := Args.Shape.Id;

End Sub WorkspaceBox1OnBeforeMoveCP;

После выполнения события в переменной "s" будет содержаться идентификатор соединительной линии, конечную точку которой собираются переместить.

См. также:

IMoveCPEventArgs