主要用到函数说明: 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"…

主要用到函数说明: MxDrawXCustomEvent::KeyDown 键盘被按下,详细说明如下: 参数 说明 LONG lVk 是按钮码,如F8,的值为#define VK_F8 0x77 返回_T("1")消息不往下传递,否则消息继续往下传递. 例如: VB下,处理F1被按下的代码: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16         Private Sub MxDrawX1_CustomEvent(ByVal sEventName A…

主要用到函数说明: 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…

由一个自定义实体事件中的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…

主要用到函数说明: _DMxDrawXEvents::ObjectGripEdit 对象的夹点被编辑完成后,会调用该事件,详细说明如下: 参数 说明 LONGLONG lId 对象的id LONG iGridIndex 被编辑的夹点索引 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 4…

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 Private Sub DrawImageMarkImp()         '…

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 Private Sub MxDrawX1_CustomEvent(ByVal sEventName As String)        If sEventName = "ObjectGripEdit" Then           …

主要用到函数说明: _DMxDrawX::WriteBinStream 把控件图形变成二进制流输出,详细说明如下: 参数 说明 VARIANT* pVarBinArray 输出二进制数组.是个byte数组 BSTR sPassword 数据密码,没有密码,传空字符串 LONG iVersion 输出的文件版本,如果保存CAD 2002图纸,可以传 23 代码实现如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 Dim aryData    …

主要用到函数说明: MxDrawXCustomFunction::Mx_RegistUserCustomCommand 向控件注册一个命令,用户在命令行输入命令名这个字符串,就会触发执行命令事件 命令事件的id就是该注册时的id值,详细说明如下: 参数 说明 CString sCommandName 命令名称 LONG lId 命令id VB代码实现如下: 1 2 3 4 5 6 Set param2 = New MxDrawXLib.MxDrawResbuf param2.AddString…

主要用到函数说明: 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…

主要用到函数说明: 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…

主要用到函数说明: MxDrawXCustomFunction::Mx_SendStringToExecuteFun 把一个命令当着一个函数调用,不执行,详细说明如下: 参数 说明 CString sCmaName 命令名 Param 命令参数 例如: VB,在命令中,调用绘矩形命令函数,并得到绘制的矩形id.,该代码在命令事件中执行. 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21             Dim param As M…

主要用到函数说明: MxDrawXCustomFunction::ExApp_CutDwg 与用户互在图面上得到一个矩形框,详细说明如下: 参数 说明 IN DOUBLE dX1 保存范围的左下角位置X值 IN DOUBLE IN dY1 保存范围的左下角位置Y值 IN DOUBLE dX2 保存范围的右上角位置X值 IN DOUBLE IN dY2 保存范围的右上角位置Y值 sFile 保存的文件名 主要用到函数说明: MxDrawXCustomFunction::Mx_GetCorner 与…

主要用到函数说明: MxDrawXCustomFunction::Mx_HideToolBarControl 隐藏或显示工具条上的按钮.详细说明如下: 参数 说明 IN LPCTSTR pszToolBarName 工条名称 IN LPCTSTR pszControlName = NULL 按钮名称,多个按钮名称,可以用逗号分隔开,为空,隐藏或显示所有按钮 IN BOOL isHide = TRUE 是否隐藏按钮 IN BOOL isAutoRecalcLayout = TRUE 是否自动重新布…

主要用到函数说明: MxDrawXCustomFunction::Mx_OpenBackgroundFile 把一个dwg文件,或者图像文件当着一个背景导入.详细说明如下: 参数 说明 CString sFileName DWGBMPJPG文件路径,,文件件名为空时,清空背景文件 LONG lightColor = 0x505050 背景灰度显示颜色,灰度显示的颜色,默认值为0x505050 BOOL isZoomE = TRUE 是否自动把调用ZoomE操作,默认值为1 BOOL isUpDi…

主要用到函数说明: MxDrawXCustomFunction::Mx_SendStringToExecute 执行一个带参数的命令.详细说明如下: 参数 说明 CString sCmaName 命令名 Param 命令参数 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 Dim param As MxDrawResbuf Set param = New MxDrawRes…

主要用到函数说明: MxDrawXCustomFunction::Mx_SetSysVar 设置系统变量.详细说明如下: 参数 说明 CString sVarName 系统变量名 Value 需要设置的值 设置系统变量DYNINPUT值为0: 1 2 3 4 5 Dim param As MxDrawResbuf Set param = New MxDrawResbuf param.AddString "DYNINPUT" param.AddLong 0, 5010 '5010 = R…

主要用到函数说明: MxDrawXCustomFunction::ReadBinStreamEx 从二进流加载数据,详细说明如下: 参数 说明 IMxDrawBinStream* pBinStream 二进制流对象 代码实现如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 Dim param As MxDrawResbuf Set param = New MxDrawResbuf   Dim ret As MxDrawBinStream  …

主要用到函数说明: MxDrawXCustomFunction::WriteBinStreamEx 把当前图上数据保存为一个二进流对象,详细说明如下: 参数 说明 LPCTSTR pszPassword = NULL 保存密码,默认为空 LONG lVersion = McDb::vAC18 保存版本号 代码实现如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 Dim param As MxDrawResbuf Set param = New…

主要用到函数说明: _DMxDrawX::DrawText 绘制一个单行文字.详细说明如下: 参数 说明 DOUBLE dPosX >文字的位置的X坐标 DOUBLE dPosY 文字的位置的Y坐标 BSTR pszText 文字内容字符串 DOUBLE dHeight 文字高度 DOUBLE dRotation 文字的旋转角度 SHORT horizontalMode 文字的水平对齐方式,0=kTextLeft,1=kTextCenter,2=kTextRight SHORT vertical…

主要用到函数说明: 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…

主要用到函数说明: 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…

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

主要用到函数说明: 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…

主要用到函数说明: _DMxDrawX::DrawDimAligned 绘制一个对齐标注.详细说明如下: 参数 说明 DOUBLE dExtLine1PointX 第一条界线开始点X值 DOUBLE dExtLine1PointY 第一条界线开始点Y值 DOUBLE dExtLine2PointX 第二条界线开始点X值 DOUBLE dExtLine2PointY 第二条界线开始点Y值 DOUBLE dTextPositionX 标注使用的指定标注线位置的定义点X值 DOUBLE dTextPo…

主要用到函数说明: _DMxDrawX::DrawDimAngular 绘制一个角度标注.详细说明如下: 参数 说明 DOUBLE dAngleVertexX 角度标注的顶点的X值 DOUBLE dAngleVertexY 角度标注的顶点的Y值 DOUBLE dFirstEndPointX 角度标注第一个参考线上的点X值 DOUBLE dFirstEndPointY 角度标注第一个参考线上的点Y值 DOUBLE dSecondEndPointX 角度标注第二个参考线上的点X值 DOUBLE dS…

主要用到函数说明: _DMxDrawX::DrawDimDiametric 绘制一个直径标注.详细说明如下: 参数 说明 DOUBLE dChordPointX 在被标注的曲线上的第一个点X值 DOUBLE dChordPointY 在被标注的曲线上的第一个点Y值 DOUBLE dFarChordPointX 在被标注的曲线上的第二个点X值,这个点与chordPoint直径相对 DOUBLE dFarChordPointY 在被标注的曲线上的第二个点Y值,这个点与chordPoint直径相对 D…

主要用到函数说明: _DMxDrawX::DrawDimRotated 绘制一个线型标注.详细说明如下: 参数 说明 DOUBLE dExtLine1PointX 输入第一条界线的起始点X值 DOUBLE dExtLine1PointY 输入第一条界线的起始点Y值 DOUBLE dExtLine2PointX 输入第二条界线的起始点X值 DOUBLE dExtLine2PointY 输入第二条界线的起始点Y值 DOUBLE dDimLineLocationX 输入标注线自身上的点X值 DOUBL…

主要用到函数说明: _DMxDrawX::DrawDimRadial 绘制一个半径标注.详细说明如下: 参数 说明 DOUBLE dCenterX 被标注的曲线的中点X值 DOUBLE dCenterY 被标注的曲线的中点Y值 DOUBLE dChordPointX 被标注的曲线上的点X值 DOUBLE dChordPointY 被标注的曲线上的点Y值 DOUBLE dLeaderLength 输入箭头长度 VB中实现代码说明: 1 2 3 4 5 6 7 8 9 10 11 12 13 14…

主要用到函数说明: MxDrawXCustomFunction::Mx_Print 直接打印,不出现打印对话框,详细说明如下: 参数 说明 double ptLBx 打印的范围左下角x double ptLBy 打印的范围左下角y double ptRTx 打印的范围右上角x double ptRTy 打印的范围右上角y LPCTSTR pszPrintName 打印机名,如果传为空,取系统默认打印机 LPCTSTR pszPaperName 打印的图纸名,如果传为空,取系统默认打印机设置 LO…