注册热键!
来源:互联网 发布:windows下运行的ghost 编辑:程序博客网 时间:2024/06/10 19:39
private
{ Private declarations }
hotkeyID:integer;//全局变量,定义热键ID变量
procedure shorcut(var msg:TMessage);//定义 Windows 的消息WM_HOTKEY 的 HOOK 链
message WM_HOTKEY;
2.注册热键:
hotkeyID:=GlobalAddATom('hotkey');
RegisterHotkey(Handle,hotkeyID,mod_Control,88);
3. 消息响应:
procedure TForm1.shorcut(var msg: TMessage);
begin
msg.Result:=1; //表示消息已经用过!
Application.BringToFront;
Application.MessageBox('热键已起作用!','提示',MB_OK+MB_ICONInformation);
end;
4. 释放资源:
procedure TForm1.FormDestroy(Sender: TObject);
begin
UnRegisterHotKey(handle,hotkeyID);
DeleteAtom(HotKeyID);
end;
5.RegisterHotKey 函数原形如下
BOOL RegisterHotKey(
HWND hWnd, // 连接热键的窗口句柄
int id, // 全局原子句柄
UINT fsModifiers, // 热键修饰标志
UINT vk // 虚拟键盘码
);
找虚拟键值,可以在delphi help里搜索virtual Key
- 注册热键!
- 注册热键!
- 注册热键
- 注册热键
- 注册热键
- 注册热键
- 注册热键
- 注册热键
- 热键注册
- 如何注册系统热键
- WinForm 如何注册热键?
- 注册系统热键
- 注册系统热键
- C#注册系统热键
- delphi 多热键注册
- 注册系统热键
- C#注册全局热键
- 注册系统热键
- 可导致windows系统完全崩溃,并重新启动的一小段代碼
- 制作开启3389的工具
- Iptables 指南 1.1.19 (1)
- Iptables 指南 1.1.19 (2)
- Iptables 指南 1.1.19 (3)
- 注册热键!
- Linux Firewall Proxy Howto(中文版)-by reden (1)
- Linux Firewall Proxy Howto(中文版)-by reden (2)
- 如何在多台电脑上安装WINDOWS
- Linux Firewall Proxy Howto(中文版)-by reden (3)
- 快贴驿站
- 端口简介:本文介绍端口的概念,分类,以及如何关闭/开启一个端口
- 明天就公测了,兴奋ING~~~~
- 转些关于imx