应用程序敏感键的实现

应用程序敏感键的实现(2) 如下(这里只是简单地把窗口最前面显示)
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);
…
----到这里为止，你应当对敏感键技术有了全面的了解，以上的例子相当简单同时也没有提供必
要的调用成功检测，可以根据具体情况加以完善，希望对你的开发过程会有所帮助.