|
www.mxdraw.com
|
自定义实体事件,自定义实体夹点被移动。
static VOID MxDrawXCustomEntity::moveGripPointsAt(LONGLONG lEntity, IN LONG lGridIndex, IN McGePoint3d vec);
|
参数 |
说明 |
|
LONGLONG lEntity |
自定义实体id. |
|
IN LONG lGridIndex |
夹点索引号 |
|
IN McGePoint3d vec |
夹点移动的向量 |
例如: VB
If sEventName = "MxDrawXCustomEntity::moveGripPointsAt" Then
Dim param88 As MxDrawResbuf
Set param88 = MxDrawX1.CustomEventParam()
Set customEntity = MxDrawX1.CallEx("Mx_GetCustomEntity", param88)
Set sPt = customEntity.GetPoint("startpoint")
Set ePt = customEntity.GetPoint("endpoint")
Dim lIndex As Long
lIndex = param88.AtLong(1)
Dim offsetPt As MxDrawPoint
Set offsetPt = param88.AtPoint(2)
If lIndex = 0 Then
sPt.x = sPt.x + offsetPt.x
sPt.y = sPt.y + offsetPt.y
customEntity.SetPoint "startpoint", sPt
Else
ePt.x = ePt.x + offsetPt.x
ePt.y = ePt.y + offsetPt.y
customEntity.SetPoint "endpoint", ePt
End If
End If