delphi7 编译的程序在win7下请求获得管理员权限的方法

网上找到的，记下来方便查找，亲测此方法可用。附带把编译好的uac.res上传。

首先，用记事本新建一文本文档，内容如下：

1 24 UAC.manifest

然后另存为uac.rc

另外新建一文本档，内容如下，另存为UAC.manifes

<?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>

两文件放在同一文件夹下面，如：放在d:\testuac目录，开始->运行-> 输入cmd

输入命令brcc32 d:\testuac\uac.rc

如果路径中间如果有空格请加上双引号""

然后在把编译虚的uac.res放入你的工程目录中，并中引用.

program RegService;
uses
Forms,
UMain in 'UMain.pas' {frmMain};
{$R *.res}
{$R uac.res}
begin
Application.Initialize;
Application.CreateForm(TfrmMain, frmMain);
Application.Run;
end.