社区
Windows SDK/API
帖子详情
关于热键的问题
besthome
2004-04-04 06:07:53
如何通过DEPHI编程实现QQ“ALT+CTRL+Z”重新激活窗体的功能?
最好有源程序,谢谢!
...全文
59
5
打赏
收藏
关于热键的问题
如何通过DEPHI编程实现QQ“ALT+CTRL+Z”重新激活窗体的功能? 最好有源程序,谢谢!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
besthome
2004-04-04
打赏
举报
回复
我在win98下运行也没有成功,只是窗口隐藏了,在任务列表中没有显示。
我需要的效果是类似QQ的“隐藏/显示”,谢谢!在NT下能成功运行更好!谢谢!
besthome
2004-04-04
打赏
举报
回复
楼上两个代码我在windows2003下没有运行成功,其中的ID=0,不知道是何缘故,请赐教!
yanghoyu
2004-04-04
打赏
举报
回复
http://www.yesky.com/20020617/1616253.shtml
我测试过了,是没有问题的
ekin
2004-04-04
打赏
举报
回复
在一个应用程序内部菜单、部件都可以设置敏感键。如在菜单中一般用Alt+F进入“文件”之类的子菜单。另外我们在桌面上设置的快捷方式里的快捷键,无论你任何时候按下你所设置的快捷键就会启动相应的应用程序。在多个正在运行的应用程序中如何利用一个按键动作迅速地回到你所需要的应用程序呢?这就需要利用敏感键(HOTKEY)的技术来实现。本文利用Delphi3.0开发工具来阐述该技术在应用程序的实现方法。
一、敏感键的设置
---- 在windows Api中有一个函数RegisterHotKey用于设置敏感键,它的调用方式如下:
BOOL RegisterHotKey(
HWND hWnd, //响应该敏感键的窗口句柄
Int id, //该敏感键的唯一标示符
UINT fsModifiers, //该敏感键的辅助按键
UINT vk //该敏感键的键值
);
---- 其中敏感键的唯一标示符在Window中规定应用程序的取值范围为0x0000到0xBFFF之间,动态链接库的取值范围为0xC000到0xFFFF之间。为了保证其唯一性建议使用GlobalAddAtom函数来设置敏感键的唯一标示符。需要注意的是GlobalAddAtom还回的值是在0xC000到0xFFFF范围之间,为满足RegisterHotKey的调用要求,如果是在应用程序中设置敏感键可以利用GlobalAddAtom还回值减去0xC000。
---- 敏感键的辅助按键包括Mod_Ctrl 、Mod_Alt、Mod_Shift,对于Windows兼容键盘还支持Windows键,即其键面上有Windows标志的那个键,其值为Mod_win。
---- 在Delphi中建立一个“New Application”,在Tform1中的Private段中加入如下代码
private
{ Private declarations }
hotkeyid :integer;
procedure WMhotkeyhandle(var msg:Tmessage);
message wm_hotkey; //响应敏感键按键消息
在FormCreate事件中加入如下代码
…
hotkeyid:=GlobalAddAtom(pchar
(“UserDefineHotKey”))-$C000;
//减去$C000是为了保证取值范围的限制
registerhotkey(handle,hotkeyid,
MOD_CONTROL or mod_Altt,$41);
//敏感键为ctrl+Alt+A
…
二、敏感键的响应
---- 一旦敏感键设置成功,在程序应用过程中如果有相应敏感键被按下,Windows系统都会给你的应用程序发送一个消息WM_HOTKEY,不管你的应用程序是否为当前活动的。其中WM_HOTKEY消息的格式为:
idHotKey = (int) wParam;
// 该参数在设置系统级的敏感键有用,一般不予使用
fuModifiers = (UINT) LOWORD(lParam);
//敏感键的辅助按键
uVirtKey = (UINT) HIWORD(lParam);
//敏感键的键值
---- 因为Windows系统只是把一个WM_HotKey的消息发送给应用程序,要完成具体的事情需要一个消息处理程序,也就是上面Private段里的procedure WMhotkeyhandle(var msg:Tmessage); message wm_hotkey; 过程, 它的代码如下(这里只是简单地把窗口最前面显示)
procedure TForm1.Wmhotkeyhandle
(var msg:Tmessage);
begin
if (msg.LParamHi=$41) and
(msg.lparamLo=MOD_CONTROL or mod_Alt) then
begin
msg.Result:=1; //该消息已经处理
application.BringToFront;
//把窗口最前面显示
end;
end;
三、敏感键的释放
---- 在应用程序退出来之前应当把你所设置的敏感键释放掉,以释放其所占有的系统资源,这里需要调用两个Windows API函数UNREGISTERHOTKEY,它的调用格式如下:
BOOL UNREGISTERHOTKEY(
HWND HWND, //与敏感键关联的窗口句柄
INT ID //敏感键的标示符
);
也就是说只要在FormClose事件中加入如下代码
…
unregisterhotkey(handle,hotkeyid);
DeleteAtom(HotKeyID);
SydPink
2004-04-04
打赏
举报
回复
RegisterHotKey();UnRegiserHotKey();具体参数和使用你看 Windows SDK Help里的说明
易语言实现局部
热键
易语言实现局部
热键
源码,实现局部
热键
,键盘钩子处理,API_GetForegroundWindow,API_SetWindowsHookEx,GetModuleHandleA,API_RtlMoveMemoryJ,CallNextHookEx,API_UnhookWindowsHookEx
雷神911
热键
驱动
雷神911的
热键
驱动程序,找不到的可以下载这个,完美解决
问题
。
Windows Hotkey Explorer(系统
热键
占用查看器)官方正式版V2.1 |
热键
冲突怎么解决
并允许用户自由修改快捷键,为用户自主管理自己操作系统的所有快捷键(
热键
)提供了诸多便利,大大降低了应用程序之间的
热键
冲突导致的一系列使用不便的
问题
,作为方便实用的Windows系统
热键
资源管理器软件,Windows...
window
热键
冲突查找工具
安装的软件多了,经常出现
热键
失灵,不知道和哪个软件的
热键
冲突。通过Hotkey Commander 可以快速查看各软件已占用的快捷键。 若有
问题
参考http://blog.csdn.net/gnail_oug/article/details/51926277
QT
热键
实现例程
QT
热键
实现的简单例程,用于没有PRO文件的
问题
之二(添加pri文件)>>
Windows SDK/API
1,183
社区成员
22,335
社区内容
发帖
与我相关
我的任务
Windows SDK/API
Delphi Windows SDK/API
复制链接
扫一扫
分享
社区描述
Delphi Windows SDK/API
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章