以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  窗口快捷键  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=97506)

--  作者:yangwenghd
--  发布时间:2017/3/13 17:41:00
--  窗口快捷键
能帮忙看看这个快捷键吗,后面的代码是写在那里的啊 感谢 感谢 
 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:快捷键.table


自定义函数

 

处理快捷键

 

Dim m As object = args(0)

Select Case m.WParam

    Case 100

        msgbox("按下的快捷键是: F10")

    Case 101

        msgbox("按下的快捷键是: Ctrl+Y")

    Case 102

        msgbox("按下的快捷键是: Ctrl+Alt+Y")

End Select

 

全局代码

 

API

 

<DllImport("user32.dll", SetLastError := True)> _

Public Function RegisterHotKey(hWnd As IntPtr, id As Integer, fsModifiers As KeyModifiers, vk As Keys) As Boolean


--  作者:有点色
--  发布时间:2017/3/13 19:04:00
--  

参考

 

http://www.foxtable.com/webhelp/scr/1842.htm

 


--  作者:yangwenghd
--  发布时间:2017/3/14 20:46:00
--  
谢谢 谢谢 API 是在那里啊 感谢 感谢 
--  作者:有点蓝
--  发布时间:2017/3/14 21:05:00
--  
全局代码。

1楼代码不完整,没法用

--  作者:yangwenghd
--  发布时间:2017/3/14 21:11:00
--  
就是不知道写在那里 ,后面有完整的代码。
我只是想在选中这个窗口后,然后点击 ctrl + v    是点击Button1的左键, ctrl + b  是Button1的右键,  ctrl + n 是Button2的左键,这个可以吗  感谢 感谢  

--  作者:有点蓝
--  发布时间:2017/3/14 21:17:00
--  
不说是全局代码吗,看2楼帮助啊
--  作者:yangwenghd
--  发布时间:2017/3/14 21:43:00
--  
 这个是写在那里啊 感谢 感谢
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170314214216.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2017/3/14 21:45:00
--  
红色字咯,自定义函数,函数名称是蓝色字“处理快捷键”
--  作者:yangwenghd
--  发布时间:2017/3/14 21:56:00
--  
自定义需要写在那里吗?
--  作者:有点蓝
--  发布时间:2017/3/14 22:06:00
--  
内部函数
图片点击可在新窗口打开查看