www.mxdraw.com
|
执行一个带参数的命令
static BOOL Mx_SendStringToExecute(CString sCmaName, Param);
参数 |
说明 |
CString sCmaName |
命令名 |
Param |
命令参数。 |
成功返回TRUE.
例如: VB
Dim param As MxDrawResbuf Set param = New MxDrawResbuf param.AddString "CECOLOR" '5是autocad颜色索引,5003是dxf组码,这里约定传5003才有效。 param.AddLong 5, 5003 '设置颜色系统变量 MxDrawX1.CallEx "Mx_SetSysVar", param '设置线型。 MxDrawX1.AddLinetype "MyLineType3", "30,-10" param.RemoveAll 'CELTYPE当前线型的系统变量名 param.AddString "CELTYPE" '是设置的值,线型取MyLineType3,5005是dxf组码,这里约定传5005才有效。 param.AddString "MyLineType3", 5005 MxDrawX1.CallEx "Mx_SetSysVar", param '调用绘制矩形命令 param.RemoveAll param.AddString "Mx_Rectang" '是绘制矩形的线宽.这是命令参数。 param.AddDouble 10 MxDrawX1.CallEx "Mx_SendStringToExecute", param