Delphi下如何使程序在Win7/Vista上用管理员权限运行[转]

Delphi程序必须在资源里面嵌入MANIFEST信息

一、 首先编辑一个文件，内容如下：
<?xml version="1.0" encoding="utf-8"?>
<asmv1:assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
  <assemblyIdentity version="1.0.0.0" name="MyApplication.app"/>
  <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
    <security>
      <requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
        <requestedExecutionLevel level="requireAdministrator" uiAccess="false" />
      </requestedPrivileges>
    </security>
  </trustInfo>
</asmv1:assembly>


保存为UAC.manifest，这里文件是随意的。特别注意红色的“requireAdministrator”，这个表示程序需要管理员（Administrator）才能正常运行。

二 、然后编辑一个RC文件，名称为uac.rc 内容为：

1 24 UAC.manifest

 

注释：
*数字1表示资源编号；
*数字24表示资源类型为RTMAINIFEST；
*UAC.manifest表示前面的文件名称。

三、 用brcc32编译这个rc文件为res文件，如下所示：
brcc32 uac.rc -fouac.res

四 、在程序program文件{$R *.res}后面加入
{$R uac.res}

同时去掉Project ->Options->Application->Enable runTime themes 的“√”，然后重新编译exe文件即可

五 、把文件放到vista或win7下运行，就会看程序图标下面显示UAC盾牌标志了。