怎样屏蔽Windows键?

macro_love 2002-10-08 10:29:46
我用EnableWindows能屏蔽鼠标和键盘的输入,但不能屏蔽掉Windows键(就是Ctrl旁边的那个键,按一下出现开始菜单的那个)的响应,请问怎样才能屏蔽它的响应呢?
...全文
66 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
shuixin13 2002-10-08
  • 打赏
  • 举报
回复
先顶一下
Wnyu 2002-10-08
  • 打赏
  • 举报
回复
// Disable system key.
procedure TurnSysKeysOff;
var
OldVal : LongInt;
begin
SystemParametersInfo (97, Word (True), @OldVal, 0)
end;

procedure TurnSysKeysBackOn;
var
OldVal : LongInt;
begin
SystemParametersInfo (97, Word (False), @OldVal, 0)
end;
LiuFan 2002-10-08
  • 打赏
  • 举报
回复
使用Hook拦截。
wxjh 2002-10-08
  • 打赏
  • 举报
回复
sorry
provate
procedure aaa(var msg:tmessage);message wm_keydown;
....
tform1.aaa(var msg:tmessage);
begin
if msg.lparam= wm_win then
...
end;
inherited;
wxjh 2002-10-08
  • 打赏
  • 举报
回复
使用消息处理
private
procedure aaaa(var msg:tmessage);message wm_win(这个查一下);


。。。。
97132 2002-10-08
  • 打赏
  • 举报
回复
Favorite
macro_love 2002-10-08
  • 打赏
  • 举报
回复
还有Alt+Tab键组合也不能屏蔽掉,有没有办法呢?
macro_love 2002-10-08
  • 打赏
  • 举报
回复
怎么Win2k中不行呀

5,931

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧