实现功能:
程序打开时自动以管理员方式运行
实现原理:
依据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、运行批处理文件,即可产生资源文件