论坛首页 › 『CAD制图技术交流』 › CAD处理键盘被按下事件（com接口VB语言）

lihao2014 发表于 2019-6-12 13:59:47

CAD处理键盘被按下事件（com接口VB语言）

主要用到函数说明：
MxDrawXCustomEvent::KeyDown
键盘被按下，详细说明如下：

参数 说明
LONG lVk 是按钮码，如F8,的值为#define VK_F8 0x77
返回_T("1")消息不往下传递,否则消息继续往下传递。
例如: VB下，处理F1被按下的代码：      Private Sub MxDrawX1_CustomEvent(ByVal sEventName As String)
      If sEventName = "KeyDown" Then
            Dim param As MxDrawXLib.MxDrawResbuf
            ' 得到事件参数
            Set param = MxDrawX1.CustomEventParam

            Dim lVk As Long
            lVk = param.AtLong(0)

            ' #define VK_F1             0x70,十进制值:112
            If lVk = 112 Then
            MsgBox "F1按下"
                ' 设置返回值1表示该事件不再传递处理.
                MxDrawX1.SetEventRetString "1"
            End If
      End If

查看完整版本: CAD处理键盘被按下事件（com接口VB语言）