在PB中实现系统热键功能
来源:互联网 发布:声优黑历史 知乎 编辑:程序博客网 时间:2024/05/17 22:42
1、首先我们必须声明Windows API的外部函数:
FUNCTION Integer GlobalAddAtom(ref string lpString) LIBRARY "kernel32.dll" ALIAS FOR "GlobalAddAtomA" FUNCTION ulong RegisterHotKey(ulong hwnd,ulong id,ulong fsModifiers,ulong vk) LIBRARY "user32.dll"
2、接下来,我们必须给一些需要用到的定量赋上初始值。
Public:
constant integer MOD_ALT = 1
constant integer MOD_CONTROL = 2
constant integer MOD_SHIFT = 4
3、接下来,我们必须利用下面代码在系统中注册我们要使用的热键:
//在窗口的Open事件中
long ll_RC
string ls_str
ls_str = "My atom ID"
atomid = GlobalAddAtom(ls_str) //得到唯一的ID,保证不和其他应用程序发生冲突
ll_RC = RegisterHotKey(Handle(this), atomid, MOD_ALT + MOD_CONTROL, 65) // 65为'A'
//注册的热键为Ctrl+Alt+A
if ll_RC = 0 then
messagebox("错误","错误信息")
end if
4、最后,编写当用户按下热键时的处理程序:
//在窗口的Other事件中
IF wparam = atomid THEN
This.Show()
//在这里编写处理程序
END IF
- 在PB中实现系统热键功能
- 在PB中实现热键功能的方法
- 在PB中实现热键的方法
- 在PB中实现热键的方法
- 在PB中实现分段打印功能
- PB中系统热键(不管窗口是否有焦点)
- 在C#程序中使用系统热键
- 在C#程序中使用系统热键
- 在C#程序中使用系统热键
- 在C#程序中使用系统热键
- 在C#程序中使用系统热键
- 在C#程序中使用系统热键
- 在C#程序中使用系统热键
- 在C#程序中使用系统热键
- 在C#程序中使用系统热键
- 在WPF程序中使用系统热键
- 在C#程序中使用系统热键
- 实现热键的功能
- 美杂志盘点08年美国IT业十大失败事件
- 微软报表ReportingService部署问题
- Linux下读写速度测试
- Mmap and remap_page_range(), in the nutshell.
- 一年后开源将遍布商业的每个角落
- 在PB中实现系统热键功能
- 小談 mmap() 與 VMA
- 【MSSQLServer】 T-SQL完整整理
- 发现一个以前不会发现的虫子
- struts2多文件动态下载及中文解决方案
- 日期处理类
- 黄静华硕案获国家赔偿 称对赔偿额保留意见(图)
- 看---1500应届硕士竞聘"猪肉佬"
- 天堂电影院