(请教)如何为程序设置热键 (50分)

  • 主题发起人 主题发起人 xie_huan
  • 开始时间 开始时间
X

xie_huan

Unregistered / Unconfirmed
GUEST, unregistred user!
设计要求:按下热键时,程序显示在最前面,而不影响其他程序的运行。再次按下热键<br>则隐藏起来
 
使用RegisterHotKey可以注册你自己的系统热键
 
form的Private: &nbsp; <br>&nbsp; &nbsp;procedure ChangeHotKey(var T: TWMHOTKEY);<br>&nbsp; &nbsp; &nbsp; &nbsp;message WM_HOTKEY;<br><br><br>create事件 &nbsp;RegisterHotKey(Handle,1,MOD_ALT,VK_SPACE); //可注册多个热键<br>&nbsp; ,第二个参数不同,1,2,3... 安定so on<br><br>procedure Tfrm_Main.ChangeHotKey(var T: TWMHOTKEY);<br>begin &nbsp;//热键消息处理<br>if (T.HotKey=1) and ((Hiword(TMessage(T).Lparam))=VK_SPACE) then<br>&nbsp;begin<br>end<br>else<br>begin<br>end; <br>end;<br><br>注销热键unRegisterHotKey(handle,1);
 
RegisterHotKey<br>注册系统热键
 
后退
顶部