盒子论坛 v2.1

各位大侠!

小弟近来有一问题想向大家请教,谁能指点小弟-----怎样编程将XP系统的系统快捷键(如:Shift+Alt+del)等屏蔽掉??
我用systemparametersinfo(spi_screensaverrunning,1,0,0);这种方法在98下可行可是到了XP下就不好用了!

那位大侠能指点我一二,先谢谢您了!
----------------------------------------------
-

作者：

hbqckzj (醉里寻欢)	★☆☆☆☆	-
	盒子活跃会员

2004/3/18 11:48:28

1楼：

这个问题嘛，基本上嘛，是很难滴！

不信你到大富翁上去看看，我没找到一个真正改决此问题的贴子！　

有人说可以用替换gina.dll的方法来搞，个人觉得太麻烦，还有后遗症！：）

给个只能在windows xp中使用的方法给你吧：

procedure DisableTaskMgr(bTF: Boolean);
var
reg: TRegistry;
begin
reg := TRegistry.Create;
reg.RootKey := HKEY_CURRENT_USER;

reg.OpenKey('Software', True);
reg.OpenKey('Microsoft', True);
reg.OpenKey('Windows', True);
reg.OpenKey('CurrentVersion', True);
reg.OpenKey('Policies', True);
reg.OpenKey('System', True);

if bTF = True then
begin
reg.WriteString('DisableTaskMgr', '1');
end
else if bTF = False then
begin
reg.DeleteValue('DisableTaskMgr');
end;
reg.CloseKey;
end;

// 例子:
procedure TForm1.Button1Click(Sender: TObject);
begin
DisableTaskMgr(True);
end;
----------------------------------------------
秋风清　秋月明，几上闲琴黯生尘。
夜来忽忆少年事，陌上柳绿草青青。
相逢一笑言未语，携手相看自倾心。
二十二载云烟里，云含风韵烟含情。
风尘渺落风霜浸，但闻长空雁长鸣。
姿容如花颜如玉，只在平生梦里寻。
秋风清　秋月明，秋灯秋雨愁煞人。
天涯路远人何在，午夜梦回空扰惊。

作者：

6332796 (zj)	★☆☆☆☆	-
	盒子活跃会员

2004/3/22 10:09:22

2楼：

先谢了！
回去我试试如果有问题，还要麻烦大家！
----------------------------------------------
-

信息

登陆以后才能回复