在xp中停用Ctrl+Alt+del
var
Reg:TRegistry;
begin
Reg:=TRegistry.Create;
Reg.RootKey:=HKEY_CURRENT_USER;
if Reg.OpenKey(‘software\microsoft\windows\currentversion\policies\system‘,true) then
Reg.WriteBool(‘disabletaskmgr‘,true);
Reg.closeKey;
Reg.Free;
end;
end.
要在单元中加Registry;要恢复则把Reg.WriteBool(‘disabletaskmgr‘,false);就ok了.
