可以从 Delphi 打开 PowerShell（以管理员身份运行）吗？

Question

当我单击 Delphi 中的按钮时，我想以管理员身份打开 Powershell（如果提示 UAC 提升则没有问题）。

可以吗？

谢谢你

Answer 1

可能有更简单的方法，但这个有效。
创建一个 CMD/BAT 文件并写入以下内容：

@echo off
if not "%1"=="am_admin" (powershell start -verb runas '%0' am_admin & exit /b)
cd
@cd /d "%~dp0"
cd
powershell.exe

使用 ShellExecute 在 Delphi 中保存并执行它：

ShellExecute(Handle, 'open', PChar('r:\PowerShellUAC.bat'), nil, nil, SW_NORMAL);