Question

delphi怎么禁止使用热键？屏蔽所有热键的使用

delphi怎么禁止使用热键？屏蔽所有热键的使用可以禁止win7和10的，绝对不是做恶意软件，求源码或者思路

Answer 1

key=#0，按任何键都忽略掉，如果还需要输入，就找到对应热键码做个判断就行了，键盘码在网上就能找到

追问

好像没法屏蔽，始终能用热键打开任务管理器

我win10系统试的

追答

一、在private下面 procedure HotKeyDown(var Msg: Tmessage); message WM_HOTKEY; //热键声明。
二、var HotKeyId: Integer; //全局变量。
三、FormCreate事件里写。
1、HotKeyId := GlobalAddAtom('MyHotKey') - $C000; //热键ID。
2、RegisterHotKey(Handle, hotkeyid, MOD_CONTROL, $43); //热键 ctrl+C。MOD_CONTROL是ctrl,$43是C键
3、Application.ShowMainForm := False;//隐藏窗体。
四、procedure TForm1.HotKeyDown(var Msg: Tmessage);
var Key:Word;
begin
if (Msg.LparamLo = MOD_CONTROL) AND (Msg.LParamHi = $43) then
key:=0;
end;//可以打开一个文本测试一下 按下ctrl+c 不会复制。
五、FormClose事件里
UnRegisterHotKey(handle, HotKeyId); //注销HotKey, 释放资源。

ctrl+c 换成你想屏蔽的热键就行了，我用win7测试了一下，没问题，win10不知道