屏蔽按键……

hch_d 2002-08-11 04:04:14
请问怎样在W2K下屏蔽alt+tab,alt+f4和win键?
...全文
47 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
hch_d 2002-08-12
  • 打赏
  • 举报
回复
多谢,试试先……
naughtyboy 2002-08-11
  • 打赏
  • 举报
回复
如果这个不行
用下面的试一试
private AppMessage(var Msg:TMSG;var Handled:Boolean);

procedure TForm1.AppMessage(var Msg:TMSG;var Handled:Boolean);
begin
Handled:=False;
case Msg.Message of
WM_SYSKEYDOWN:
if Msg.wParam=VK_F4 then
handled:=true;
end;
end;
在OnCreate里面
Application.OnMessage:=AppMessage;
这利用的是屏蔽系统键F4

end;
naughtyboy 2002-08-11
  • 打赏
  • 举报
回复
用SystemParametersInfo(SPI_SCREENSAVERRUNNING,Word(Disable),Oldval,0)
//Oldvalue:LongInt;
或者
SystemParametersInfo(SPI_SCREENSAVERRUNNING,1,0,0)试一试

5,386

社区成员

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

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