实现功能：

程序打开时自动以管理员方式运行

实现原理：

依据UAC（用户账户控制 User Account Control，简写作UAC)的标准，使用管理员权限需要提供一个提权申请，这个申请是利用资源文件的方式进行的

实现步骤：

1、将制作好的资源文件UAC.RES拷贝到delphi工程目录下（点击此处下载UAC.RES）

2、打开主工程文件，在{$R *.res} 这行代码下面，添加 {$R UAC.res} ，保存，重新编译你的项目，即可

以下为资源文件的制作过程：

1、新建一个文本文件，叫 UAC.manifest，用记事本打开，把下面的内容粘贴进去，保存
<?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>

2、建立一个文本文件，名字叫 UAC.rc ，写入下面的内容，保存
1 24 UAC.manifest

3、写一个批处理文件，内容为：

path=C:\Program Files (x86)\Borland\Delphi7\Bin;
Brcc32 UAC.rc

第一行是你delphi的安装目录下的bin目录下的Brcc32.exe的位置（因为要用brcc32.exe编译）
第二行的UAC.rc为刚才写的rc文件的文件名

4、运行批处理文件，即可产生资源文件