8966232 发表于 2013-4-7 00:47:11

delphi禁用调出任务管理器

delphi怎样   禁用调出任务管理器 即按下ctrl +alt +del 无任何反应

云深 发表于 2013-4-7 09:18:47

SetWindowsHookEx函数可以达到你说的效果

Delphi猿_宏业 发表于 2013-4-8 15:30:01

强烈支持楼主ing……

xmmy520 发表于 2013-5-16 23:08:06

激动人心，无法言表！

陽光ㄟ有點冷 发表于 2013-5-16 23:36:45

var
H,J,K,L:HWND;
begin
h:=FindWindow(nil,'Windows 任务管理器');//获取任务管理器窗口
J:=FindWindow(nil,'命令提示符');    //查找DOS窗口
K:=FindWindow(nil,'C:\WINDOWS\system32\cmd.exe');    //查找DOS窗口
L:=FindWindow(nil,'运行');    //查找运行窗口
PostMessage(H,WM_SYSCOMMAND, SC_MINIMIZE,0); //最小化任务管理器改参数也可以关闭他~~
SendMessage(J,WM_CLOSE,0,0);      //关闭DOS窗口
SendMessage(K,WM_CLOSE,0,0);      //关闭DOS窗口
SendMessage(L,WM_CLOSE,0,0);      //关闭运行窗口
end;

wangjie371324 发表于 2013-5-18 14:24:29

强烈支持楼主ing……
页: [1]
查看完整版本: delphi禁用调出任务管理器