正文
Delphi在Vasta/win 7下通过UAC控制
小程序：扫一扫查出行【扫一扫了解最新限行尾号】
复制小程序
在Windows编程时，为了兼容Win7与XP，许多需要底层权限的程序需要通过UAC验证，这是微软出的一个很恶心的东西……还不如Ubuntu那种Root机制呢……但是有困难我们就要克服～
现在有一种方式可以变相的绕过UAC控制。其实UAC控制有一点很弱智的是，当你的程序名字中包含Installation、Setup等词时，UAC认为你是安装程序，会默认进行UAC提示，提示用户给此程序提高权限。这对于安装包可以简单解决，但是如果我们的主程序也需要高权限的话，我们需要一个manifest文件来告诉UAC：我需要一个较高的权限，UAC也会提示用户提权。具体操作如下，但是此方法有个不能解决的问题是UAC会提示次软件未经微软认证，执行可能会影响安全。解决方法只有一个，那就是购买微软的软件认证……坑爹啊！
现在有一种方式可以变相的绕过UAC控制。其实UAC控制有一点很弱智的是，当你的程序名字中包含Installation、Setup等词时，UAC认为你是安装程序，会默认进行UAC提示，提示用户给此程序提高权限。这对于安装包可以简单解决，但是如果我们的主程序也需要高权限的话，我们需要一个manifest文件来告诉UAC：我需要一个较高的权限，UAC也会提示用户提权。具体操作如下，但是此方法有个不能解决的问题是UAC会提示次软件未经微软认证，执行可能会影响安全。解决方法只有一个，那就是购买微软的软件认证……坑爹啊！
1.建立 res 文件
建立一个文本文件，名字可以自己起，我这里叫：UAC.manifest，内容：
01 02 03 04 05 06 07 08 09 10 11 | <?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><!--这是主要的一句，申请Admin权限，等同于右键管理员打开。--><requestedExecutionLevel level="requireAdministrator"/></requestedPrivileges></security></trustInfo></assembly> |
建立文本文件，名为 UAC.rc，内容：
1 24 UAC.manifest |
编译成 uac.res 文件，运行：brcc32 uac.rc -fouac.res
2.在代码中引入
打开项目文件，加入
{$R uac.res} |
3.编译程序
这时程序就支持 VISTA 和WIN7的UAC了，在运行的时候，会弹出 WINDOWS 的提示框，询问用户是否允许以管理员身份运行。
