做个可配置的热键

Question

想起来就觉得麻烦，要保存键值到文件中，界面上还要显示是什么键，比如ctrl就要显示'ctrl'
有没有现成的模块代码？

Answer 1

可以用THotKey控件HotKey1.HotKey 就是热键，实际上就一个Word类型uses MenusShortCutToText(HotKey1.HotKey) 就是用字符串显示快捷键TextToShortCut('Ctrl+A')  就是快捷键的键值

Answer 2

如何设置应用程序的热键呢？
没有shortcut属性

Answer 3

加个ActionList,增加action,设置热键

Answer 4

    procedure WMhotkeyhandle(var msg: Tmessage);message WM_HOTKEY; //响应热键消息注册的是系统热键。