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

实现功能:

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

实现原理:

依据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、运行批处理文件,即可产生资源文件

 

 

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章