THotKeySpy 控件说明: 基本功能: 侦测键盘事件,无论应用程序是否在前景。 更新历史: -- V1.02 2002.1.31 1. 让THotKeySpy可以放在DataModule上。 -- V1.01 1999.4.16 the first version. 属性: HotKeys: THotKeys 热键集合对象 可以象这样引用热键集合中的某个热键: HotKeySpy1.HotKeys[0] 向热键集合中加入新热键: HotKeySpy1.HotKeys.Add 热键集合中的每个热键对象有如下属性: 1. Enabled: 是否禁止使用 2. Modifiers: 是否使用Ctrl, Alt, Shift, Win. 3. VirtKey: 虚键值 方法: 构造方法 constructor Create(AOwner: TComponent); override; 析构方法 destructor Destroy; override; 将Windows虚键值转换成HotKeySpy的内部虚键值 function ShortCutToVirtKey(Value: TShortCut): TVirtKey; 将HotKeySpy的内部虚键值转换成Windows虚键值 function VirtKeyToShortCut(Value: TVirtKey): TShortCut; 设置所有热键是否有效 procedure SetAllEnabled; procedure SetAllDisabled; 事件: 1. HotKeySpy 的事件 OnHotKeys: procedure TForm1.HotKeySpy1HotKeys(Sender: TObject; HotKeyIndex: Word); HotKeyIndex 为所按热键的索引号 2. 热键对象的事件 OnHotKey: procedure TForm1.HotKeySpy1HotKeys0HotKey(Sender: TObject); 演示程序(Demo.exe): 这个演示程序给出了HotKeySpy的基本用法. 包含文件: HotKeySpy.dcr HotKeySpy.pas DemoUnit.pas DemoUnit.dfm Demo.dpr Demo.exe Readme.txt