【CAD把自定义实体，变成普通实体（com接口VB语言）】的更多相关文章

CAD设置当前显示的光标（com接口VB语言）

主要用到函数说明: MxDrawXCustomFunction::Mx_SetCursor 设置当前显示的光标,光标可以从cur文件加载,详细说明如下: 参数 说明 CString sCursorFileName CUR光标文件,可以是个绝对路径,也可以是相对路径,相对于MxDrawX.ocx所在目录 例如:VB调用例子.选项择一个实体,修改光标样式 : 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16    Set mxUtility = New MxDrawXLi…

CAD处理键盘按钮被释放（com接口VB语言）

主要用到函数说明: MxDrawXCustomEvent::KeyUp 键盘按钮被释放,详细说明如下: 参数 说明 iVk 是按钮码,如F8,的值为#define VK_F8 0x77 返回0消息继续往下传递,返回1消息不往下传递. VB代码实现如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 Private Sub MxDrawX1_CustomEvent(ByVal sEventName As String) If sEventName = "KeyUp"…

CAD由一个自定义实体事件中的id得到自定义实体对象(com接口VB语言)

由一个自定义实体事件中的id得到自定义实体对象.该函数只能在自定义实体事件中调用. 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 If sEventName = "MxDrawXCustomEntity::explode" Then               Dim param66 As…

CAD把自定义实体，变成普通实体（com接口VB语言）

主要用到函数说明: MxDrawXCustomEvent::MxDrawXCustomEntity::explode 把自定义实体,变成普通实体,详细说明如下: 参数 说明 LONGLONG lEntity 自定义实体id LONGLONG lBlkRecId 用来临时普通实体的块表记录id 代码实现如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35…

CAD实现自定义实体夹点移动（com接口VB语言）

主要用到函数说明: MxDrawXCustomEvent::MxDrawXCustomEntity::moveGripPointsAt 自定义实体事件,自定义实体夹点被移动,详细说明如下: 参数 说明 LONGLONG lEntity 自定义实体id IN LONG lGridIndex 夹点索引号 IN McGePoint3d vec 夹点移动的向量 VB代码实现如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24…

CAD得到自定义实体拖放夹点（com接口VB语言）

主要用到函数说明: MxDrawXCustomEvent::MxDrawXCustomEntity::getGripPoints 自定义实体事件,得到拖放夹点,详细说明如下: 参数 说明 LONGLONG lEntity 自定义实体id OUT AcGePoint3dArray& gripPoints 返回要拖放的夹点 VB代码实现如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23             If sEve…

CAD与用户交互在图面上选择一个实体（com接口VB语言）

主要用到函数说明: IMxDrawUtility::GetEntity 与用户交互到在图面上选择一个实体,详细说明如下: 参数 说明 [out] IMxDrawPoint** pPickPoint 返回实体的选择点 [in] BSTR prompt 选择实体时的提示字符串 代码实现如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 Set mxUtility = New MxDrawXLib.MxDrawUtility Dim getPt As…

CAD得到0层上的所有实体（com接口VB语言）

主要用到函数说明: IMxDrawSelectionSet::Select 构造选择集.详细说明如下: 参数 说明 [in] MCAD_McSelect Mode 构造选择集方式 [in] VARIANT point1 构造择择集时需要使用到的点对象 [in] VARIANT point2 构造择择集时需要使用到的点对象 [in,optional] VARIANT filterData 构造选择集的过滤数据 可以取如下值 mcSelectionSetWindow = 0, mcSelection…

CAD通过扩展记录实体向数据库读写用户自定义的全局数据（com接口VB语言）

VB代码实现如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83…

CAD得到多行文本（com接口VB语言）

主要用到函数说明: MxDrawXCustomFunction::Mx_GetMTextContent 得到多行文本的,不包括格式控制符中的字符串值,详细说明如下: 参数 说明 LONG lId 多行文本的id 代码实现如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 If iCommandId = 1 Then       Set mxUtility = New MxDrawXLib.MxDrawUtility…