• --:)欢迎访问锋网源码(:--
  • 首页
  • RSS订阅
  • 常用软件
  • 网页模板
  • 网站运作
  • 锋网学院
  • 繁體中文

  • 学院首页
  • 新闻资讯
  • 网站运营
  • 网站开发
  • 美工设计
  • 数据库类
  • 服务器类
  • 网络应用
  • 操作系统
  • 软件教学
编程开发   认证考试   网络安全   文章搜索: 高级搜索
会员登录/控制面版 您的位置: 学院首页 >> 编程开发 >> Delphi >> 文章内容
 

精彩推荐

 
 

本类推荐文章

 
 

本类阅读排行

  • 用Delphi编写DelTree程序
  • 远程控制篇:模拟按键
  • DELPHI中动态调用dll
  • 远程控制篇:通过IP地址得到..
  • 直接访问WebBrowser控件中的..
  • 在delphi把字符串分割成一维..
  • dbgrideh如何实现点击标题排..
  • INI文件的读写
  • Delphi字符串函数大全
  • 远程控制篇:服务端程序的隐..
  • 用Delphi制作中国式报表
  • 在delphi字符中包括单引号('..
  • 用DEPHI为应用软件建立注册机..
  • 怎样让程序延时
  • 压缩图像文件并转换成BMP格式..
  • 一个四舍五入函数
  • 创建Borland风格的漂浮式窗口..
  • 从当前的浏览器取得当前URL
  • fileStream
  • 获得Memo、RichEdit的光标位..
 
 

应用程序敏感键的实现

  • 日期:2007-10-21     人气:     出处:     作者:
  • 字体大小:
  • 小
  • 中
  • 大

----在一个应用程序内部菜单、部件都可以设置敏感键。如在菜单中一般用Alt+F进
入“文件”之类的子菜单。另外我们在桌面上设置的快捷方式里的快捷键,无论你任何
时候按下你所设置的快捷键就会启动相应的应用程序。在多个正在运行的应用程序中如
何利用一个按键动作迅速地回到你所需要的应用程序呢?这就需要利用敏感键
(HOTKEY)的技术来实现。本文利用Delphi3.0开发工具来阐述该技术在应用程序的实
现方法。

一、敏感键的设置

----在windowsApi中有一个函数RegisterHotKey用于设置敏感键,它的调用方式如下:

BOOLRegisterHotKey(
HWNDhWnd,响应该敏感键的窗口句柄
Intid,该敏感键的唯一标示符
UINTfsModifiers,该敏感键的辅助按键
UINTvk该敏感键的键值
);
----其中敏感键的唯一标示符在Window中规定应用程序的取值范围为0x0000到0xBFFF之
间,动态链接库的取值范围为0xC000到0xFFFF之间。为了保证其唯一性建议使用
GlobalAddAtom函数来设置敏感键的唯一标示符。需要注意的是GlobalAddAtom还回的值
是在0xC000到0xFFFF范围之间,为满足RegisterHotKey的调用要求,如果是在应用程序
中设置敏感键可以利用GlobalAddAtom还回值减去0xC000。
----敏感键的辅助按键包括Mod_Ctrl、Mod_Alt、Mod_Shift,对于Windows兼容键盘还
支持Windows键,即其键面上有Windows标志的那个键,其值为Mod_win。

----在Delphi中建立一个“NewApplication”,在Tform1中的Private段中加入如下
代码

private
{Privatedeclarations}
hotkeyid:integer;
procedureWMhotkeyhandle(varmsg:Tmessage);
messagewm_hotkey;响应敏感键按键消息
在FormCreate事件中加入如下代码
…
hotkeyid:=GlobalAddAtom(pchar
(“UserDefineHotKey”))-$C000;
减去$C000是为了保证取值范围的限制
registerhotkey(handle,hotkeyid,
MOD_CONTROLormod_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段里的
procedureWMhotkeyhandle(varmsg:Tmessage);messagewm_hotkey;过程,它的代码
如下(这里只是简单地把窗口最前面显示)
procedureTForm1.Wmhotkeyhandle
(varmsg:Tmessage);
begin
if(msg.LParamHi=$41)and
(msg.lparamLo=MOD_CONTROLormod_Alt)then
begin
msg.Result:=1;该消息已经处理
application.BringToFront;
把窗口最前面显示
end;
end;
三、敏感键的释放
----在应用程序退出来之前应当把你所设置的敏感键释放掉,以释放其所占有的系统资源,这里
需要调用两个WindowsAPI函数UNREGISTERHOTKEY,它的调用格式如下:

BOOLUNREGISTERHOTKEY(
HWNDHWND,与敏感键关联的窗口句柄
INTID敏感键的标示符
);
也就是说只要在FormClose事件中加入如下代码
…
unregisterhotkey(handle,hotkeyid);
DeleteAtom(HotKeyID);
…
----到这里为止,你应当对敏感键技术有了全面的了解,以上的例子相当简单同时也没有提供必
要的调用成功检测,可以根据具体情况加以完善,希望对你的开发过程会有所帮助.

相关文章
  • QQ帮你突破网吧硬盘访问限制
  • 局域网内盗用IP的安全问题
  • 邮件安全攻略:只要糖衣不要炮弹
  • 手机病毒的分类及其防范措施
  • 如何防止黒客远程盗取QQ密码
  • 始料未及,谁在控制电脑重新启动
  • 网络常见木马的手工清除方法
  • 魔高一尺 道高一丈
  • 防火墙日志记录让蠕虫病毒无处可逃
  • 提防他人动用电脑另有妙招
相关软件

  • 网友评论:
  • 查看所有评论
  • 我要发表评论
 

关于本站 | 广告联系 | 版权声明 | 网站地图 | 加入收藏 | 帮助中心 |

Copyright © 2006-2007 fwvv.net  程序支持:木翼  皖ICP备06004916号  

感谢:点击网络 联网科技 天盈信息 中国E速网 59互联  提供服务器及带宽赞助