Delphi XE5 程序在Win7下获取管理员权限

创建一个文件UAC.manifest,内容如下:

<?xml version="1.0" encoding="UTF-8" standalone="yes"?><assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> <dependency> <dependentAssembly> <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" publicKeyToken="6595b64144ccf1df" language="*" processorArchitecture="*"/> </dependentAssembly> </dependency> <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"> <security> <requestedPrivileges> <requestedExecutionLevel level="requireAdministrator" uiAccess="false"/> </requestedPrivileges> </security> </trustInfo></assembly>

如果是不同版本的Delphi,请参考Delphi安装目录\bin\default_app.manifest文件,将上文高亮行改成requireAdministrator即可。

然后,点击Delphi的Project菜单,Options,打开设置对话框,点击左侧的Application,在Runtime Themes中选择Use custom manifest,选择刚创建的文件即可。

相关文章