Delphi与Windows 7下的用户账户控制(UAC)机制
2015-12-16 10:45
525 查看
WIN7/WIN8/WIN10, Vista提供的UAC机制,它的主要目的是防止对于操作系统本身的恶意修改。
对于Delphi程序的影响,UAC主要在于以下几点:
1、由于UAC机制,Delphi对于系统的操作可能无声的失败,而同样的程序,在2000/X下面可能运行正常。譬如注册表的改动。。。
2、为了避免这样的情况,Delphi程序必须支持Vista UAC标注,也就是说,在UAC程序的图标下面显示盾牌标志。这样可以在需要系统更高权限的时候,提醒用户。
为了让程序显示UAC标志,现在看来Vista是通过读取程序的资源(Resource)里面的MANIFEST资源,来决定是否显示“UAC盾牌”。
为了支持UAC,Delphi程序必须在资源里面嵌入MANIFEST信息。
1、首先编辑一个文件,内容如下:
保持为UAC.manifest,这里文件是随意的。特别注意红色的“requireAdministrator”,这个表示程序需要管理员(Administrator)才能正常运行。
UAC Manifest 选项:
2、然后编辑一个RC文件,名为uac.rc
其中 -fo 设置输出文件名
4、在Project程序里面加入:
或者将3,4合并为:
{$R 'uac.res' 'uac.rc'},但是必须将uac.rc添加到项目中去。
让Delphi编译的时候,把uac.res编译进exe文件
程序图标下面显示UAC盾牌标志了。
5、注意,这个程序不能运行在subst 虚拟驱动器上,否则会提示“指定路径不存在”
6、在编译时若产生错误:在project->options->application->enable runtime themes前面的勾取消,再编译就可以了!
对于Delphi程序的影响,UAC主要在于以下几点:
1、由于UAC机制,Delphi对于系统的操作可能无声的失败,而同样的程序,在2000/X下面可能运行正常。譬如注册表的改动。。。
2、为了避免这样的情况,Delphi程序必须支持Vista UAC标注,也就是说,在UAC程序的图标下面显示盾牌标志。这样可以在需要系统更高权限的时候,提醒用户。
为了让程序显示UAC标志,现在看来Vista是通过读取程序的资源(Resource)里面的MANIFEST资源,来决定是否显示“UAC盾牌”。
为了支持UAC,Delphi程序必须在资源里面嵌入MANIFEST信息。
1、首先编辑一个文件,内容如下:
<?xml version="1.0" encoding="UTF-8" standalone="yes"?> <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"> <security> <requestedPrivileges> <requestedExecutionLevel level="requireAdministrator"/> </requestedPrivileges> </security> </trustInfo> </assembly>
保持为UAC.manifest,这里文件是随意的。特别注意红色的“requireAdministrator”,这个表示程序需要管理员(Administrator)才能正常运行。
UAC Manifest 选项:
<requestedExecutionLevel level="asInvoker" uiAccess="false" /> <requestedExecutionLevel level="requireAdministrator" uiAccess="false" /> <requestedExecutionLevel level="highestAvailable" uiAccess="false" />
2、然后编辑一个RC文件,名为uac.rc
1 24 UAC.manifest 其中:<p>1-代表资源编号,24-资源类型为RTMAINIFEST,UAC.manifest-前面的文件名称 </p>3、用brcc32编译这个rc文件为res文件
brcc32 uac.rc -fouac.res
其中 -fo 设置输出文件名
4、在Project程序里面加入:
{$R uac.res}
或者将3,4合并为:
{$R 'uac.res' 'uac.rc'},但是必须将uac.rc添加到项目中去。
让Delphi编译的时候,把uac.res编译进exe文件
程序图标下面显示UAC盾牌标志了。
5、注意,这个程序不能运行在subst 虚拟驱动器上,否则会提示“指定路径不存在”
6、在编译时若产生错误:在project->options->application->enable runtime themes前面的勾取消,再编译就可以了!
相关文章推荐
- 字符串-delphi
- delphi 屏蔽任务栏,屏蔽热键
- Delphi程序调用C#.Net编译的DLL并打开窗体(详解)
- delphi 中 image 控件加载bmp、JPG、GIF、PNG等图片的办法
- Delphi属性Property学习应用总结
- 运行Delphi 2007 IDE提示无法打开"EditorLineEnds.ttr"文件
- Delphi使用TryStrToDate判断字符串是否为日期格式
- 如何让Delphi程序启动自动“以管理员身份运行"
- Delphi 重启应用程序(创建Bat文件的Process)
- Delphi内存操作API函数(备查,并一一学习)
- 重温delphi之:如何将Bitmap位图与base64字符串相互转换
- delphi 正则表达式
- 我的delphi笔记(二)
- 我的delphi笔记-来自为知笔记
- [转载]: delphi中XLSReadWrite控件的使用(1)---简介
- [转载]: delphi中XLSReadWrite控件的使用(2)---delphi XE下安装
- [转载]: delphi中XLSReadWrite控件的使用(3)---基本应用
- Delphi 2 Unleashed (一) 介绍
- Delphi实现类的持久化保存(DFM格式)
- Delphi Edit输入+号(加号),不允许显示输入符号,清空Edit,显示事件