Delphi中如何禁止某窗口被关闭的
来源:互联网 发布:蛇精脸p图软件 编辑:程序博客网 时间:2024/05/17 21:06
步骤1、最基本的,关闭该窗口右上角的“×”键
方法:form1的BorderIcons属性,bisystemmenu设为false
步骤2:任务栏右键屏蔽“关闭”选项
方法:var SysMenu: HMenu;
SysMenu :=GetSystemMenu(Application.Handle, False);DeleteMenu(SysMenu, SC_CLOSE, MF_BYCOMMAND);
步骤3:取消“alt+f4”热键
方法:FormKeyDown事件:
if (Key=VK_F4) and (ssAlt in shift) thenKey :=0;
步骤4:禁止呼出任务管理器
方法:uses Registry;
procedure DisableTaskmgr(Key: Boolean);
Var Reg:TReGIStry;
Begin
Reg:=TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey('/Software/Microsoft/Windows/CurrentVersion/Policies/System', True) then
begin
if Key then
Reg.WriteString('DisableTaskMgr','1')
else
Reg.WriteInteger('DisableTaskMgr',0);
Reg.CloseKey;
end;
except
Reg.Free;
end;
end;
- Delphi中如何禁止某窗口被关闭的
- Delphi中禁止使用Alt+f4关闭窗口
- DELPHI中MDI子窗口的关闭 和打开
- DELPHI: TTreeView 中禁止双击事件展开或关闭节点.
- Delphi 禁止Alt+F4关闭
- Delphi 关闭指定窗口
- 如何在网页中加入关闭窗口的按钮?
- WPF中如何禁用/去除窗口右上角的关闭按钮
- WPF中如何禁用/去除窗口右上角的关闭按钮
- MFC中如何自定义点击关闭窗口的操作
- 禁止Form窗口调整大小,禁止combobox输入,关闭窗口的_ 口 X
- c#禁止窗口关闭方法
- 01-禁止浏览器窗口关闭
- Delphi中让窗口关闭按钮无效的6种方法
- Delphi中让窗口关闭按钮无效的6种方法
- Delphi中让窗口关闭按钮无效的6种方法
- Delphi中禁止WebBrowser右键的方法
- Delphi中禁止WebBrowser右键的方法
- 添加LID的过程---操作NV的过程
- ICE线程池模型
- Delphi实现界面跟随鼠标移动的实例
- 网站开发前台工具介绍
- 朋友介绍的一个国外电子书下载网站
- Delphi中如何禁止某窗口被关闭的
- hehe
- Delphi如何屏蔽标题栏关闭按钮
- [zz] 如何将打印稿变成电子稿
- Mapinfo 2 googleearth插件原创
- 三个timer相关的类之一 - CTimer
- 恩
- URI、URL、URN的原理、区别及JAVA的实现
- Hibernate日志的配置(LOG4J) ---- ZT