如何得到自定义实体拖放夹点?
VB开发|黄洪辉|2018-06-12 15:53
-
回答:
主要用到函数说明:
MxDrawXCustomEvent::MxDrawXCustomEntity::getGripPoints
自定义实体事件,得到拖放夹点,详细说明如下:
参数 说明 LONGLONG lEntity
自定义实体id
OUT AcGePoint3dArray& gripPoints
返回要拖放的夹点
VB代码实现如下:
If sEventName = "MxDrawXCustomEntity::getGripPoints" Then Dim param77 As MxDrawResbuf Set param77 = MxDrawX1.CustomEventParam() Set customEntity = MxDrawX1.CallEx("Mx_GetCustomEntity", param77) Set sPt = customEntity.GetPoint("startpoint") Set ePt = customEntity.GetPoint("endpoint") param77.RemoveAll param77.AddPoint sPt param77.AddPoint ePt MxDrawX1.CallEx "Mx_SetEventRetEx", param77 End If