MxDrawXCustomFunction::Mx_SendStringToExecuteFun 方法

把一个命令当着一个函数调用，不执行。

IDL

static BOOL Mx_SendStringToExecuteFun(CString sCmaName, Param);

参数

参数	说明
CString sCmaName	命令名
Param	命令参数。

成功返回TRUE.

备注

例如: VB，在命令中，调用绘矩形命令函数，并得到绘制的矩形id.,该代码在命令事件中执行。

            Dim param As MxDrawResbuf
            Set param = New MxDrawResbuf

            param.AddString "Mx_Rectang"
            '是绘制矩形的线宽.这是命令参数。
            param.AddDouble 10
            MxDrawX1.CallEx "Mx_SendStringToExecuteFun", param

            '得到绘制的矩形id.
            Dim retparam As MxDrawResbuf
            Set retparam = MxDrawX1.Call("Mx_GetEntitysLastCmd", "")


            Dim i As Integer
            i = 1
            Do While i < retparam.Count

                MsgBox retparam.AtLong(i)

                i = i + 1
            Loop

参见其它

MxDrawXCustomFunction 方法

请参见

MxDrawXCustomFunction 接口, MxDrawXCustomFunction 成员, MxDrawXCustomFunction 方法

内容 | 索引 | 主面

你认为该帮助怎么样? 发送反馈信息!