如何让在系统托中的程序检测键盘的输入的字符?(50分)

  • 主题发起人 主题发起人 shodoy
  • 开始时间 开始时间
S

shodoy

Unregistered / Unconfirmed
GUEST, unregistred user!
就像QQ那样,只要你定义的了热键,即使你在使用其它的程序,只要有消息过来,按一已经定义的键,就可以弹出对话框?
 
---- 在一个应用程序内部菜单、部件都可以设置敏感键。如在菜单中一般用Alt+F进入<br>“文件”之类的子菜单。另外我们在桌面上设置的快捷方式里的快捷键,无论你任何时<br>候按下你所设置的快捷键就会启动相应的应用程序。在多个正在运行的应用程序中如何<br>利用一个按键动作迅速地回到你所需要的应用程序呢?这就需要利用敏感键(HOTKEY)<br>的技术来实现。本文利用Delphi3.0开发工具来阐述该技术在应用程序的实现方法。 <br><br>一、敏感键的设置 <br><br>---- 在windows Api中有一个函数RegisterHotKey用于设置敏感键,它的调用方式如下:<br>&nbsp; &nbsp; &nbsp;BOOL RegisterHotKey(<br>&nbsp; &nbsp; &nbsp;HWND hWnd, //响应该敏感键的窗口句柄<br>&nbsp; &nbsp; &nbsp;Int id, //该敏感键的唯一标示符<br>&nbsp; &nbsp; &nbsp;UINT fsModifiers, //该敏感键的辅助按键<br>&nbsp; &nbsp; &nbsp;UINT vk &nbsp;//该敏感键的键值<br>&nbsp; &nbsp; &nbsp;);<br> <br><br>---- 其中敏感键的唯一标示符在Window中规定应用程序的取值范围为0x0000到0xBFFF之<br>间,动态链接库的取值范围为0xC000到0xFFFF之间。为了保证其唯一性建议使用<br>GlobalAddAtom函数来设置敏感键的唯一标示符。需要注意的是GlobalAddAtom还回的值<br>是在0xC000到0xFFFF范围之间,为满足RegisterHotKey的调用要求,如果是在应用程序<br>中设置敏感键可以利用GlobalAddAtom还回值减去0xC000。 <br><br>---- 敏感键的辅助按键包括Mod_Ctrl 、Mod_Alt、Mod_Shift,对于Windows兼容键盘还<br>支持Windows键,即其键面上有Windows标志的那个键,其值为Mod_win。 <br><br>---- 在Delphi中建立一个“New Application”,在Tform1中的Private段中加入如下<br>代码 <br><br>&nbsp;private<br>&nbsp; { Private declarations }<br>&nbsp; hotkeyid &nbsp;:integer;<br>&nbsp; procedure WMhotkeyhandle(var msg:Tmessage);<br>&nbsp; &nbsp; &nbsp; &nbsp;message wm_hotkey; //响应敏感键按键消息<br>在FormCreate事件中加入如下代码<br>&nbsp;…<br>&nbsp;hotkeyid:=GlobalAddAtom(pchar<br>(“UserDefineHotKey”))-$C000;<br>&nbsp; &nbsp; //减去$C000是为了保证取值范围的限制<br>&nbsp;registerhotkey(handle,hotkeyid,<br>MOD_CONTROL or mod_Altt,$41); <br>&nbsp; &nbsp; //敏感键为ctrl+Alt+A<br>&nbsp; &nbsp;…<br> <br><br>二、敏感键的响应 <br><br>---- 一旦敏感键设置成功,在程序应用过程中如果有相应敏感键被按下,Windows系<br>统都会给你的应用程序发送一个消息WM_HOTKEY,不管你的应用程序是否为当前活动<br>的。其中WM_HOTKEY消息的格式为: <br><br>idHotKey = (int) wParam;<br>&nbsp; &nbsp; &nbsp;// 该参数在设置系统级的敏感键有用,一般不予使用<br>fuModifiers = (UINT) LOWORD(lParam); <br>&nbsp; &nbsp; //敏感键的辅助按键<br>&nbsp; &nbsp; &nbsp; uVirtKey = (UINT) HIWORD(lParam);<br>&nbsp; &nbsp;//敏感键的键值<br> <br><br>---- 因为Windows系统只是把一个WM_HotKey的消息发送给应用程序,要完成具体的<br>事情需要一个消息处理程序,也就是上面Private段里的<br>procedure WMhotkeyhandle(var msg:Tmessage); message wm_hotkey; 过程, <br>它的代码如下(这里只是简单地把窗口最前面显示) <br><br>&nbsp; procedure TForm1.Wmhotkeyhandle<br>(var msg:Tmessage);<br>&nbsp; &nbsp; &nbsp;begin<br>&nbsp; &nbsp; &nbsp; &nbsp;if (msg.LParamHi=$41) and <br>(msg.lparamLo=MOD_CONTROL or mod_Alt) then <br>&nbsp; &nbsp; &nbsp; &nbsp;begin<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;msg.Result:=1; //该消息已经处理<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;application.BringToFront; <br>//把窗口最前面显示<br>&nbsp; &nbsp; &nbsp; &nbsp;end;<br>&nbsp; &nbsp; &nbsp;end;<br> <br><br>三、敏感键的释放 <br><br>---- 在应用程序退出来之前应当把你所设置的敏感键释放掉,以释放其所占有的<br>系统资源,这里需要调用两个Windows API函数UNREGISTERHOTKEY,它的调用格式如下: <br><br>&nbsp; &nbsp;BOOL UNREGISTERHOTKEY(<br>&nbsp; &nbsp; &nbsp; HWND HWND, //与敏感键关联的窗口句柄<br>&nbsp; &nbsp; &nbsp; INT ID &nbsp;//敏感键的标示符<br>&nbsp; &nbsp; );<br>&nbsp; 也就是说只要在FormClose事件中加入如下代码<br>&nbsp; &nbsp;…<br>&nbsp; &nbsp;unregisterhotkey(handle,hotkeyid);<br>&nbsp; &nbsp;DeleteAtom(HotKeyID);<br><br>摘自:Delphi之未经证实的葵花宝典
 
很好!!!谢了!!!
 
接受答案了.
 
后退
顶部