Inno Setup - 如果设置设置为 Privileges Required=lowest，如何以管理员权限运行应用程序？

Question

我想使用PrivilegesRequired=lowest 运行设置。如何设置和运行应用程序 (dxwebsetup.exe) 以使用我的管理员权限安装？

我的代码（Inno Setup - Avoid displaying filenames of sub-installers）：

procedure CurStepChanged(CurStep: TSetupStep);
var
  ProgressPage: TOutputProgressWizardPage;
  ResultCode: Integer;
begin
  if CurStep = ssInstall then
  begin
    if IsComponentSelected('DirectX') then
    begin
      ProgressPage := CreateOutputProgressPage('Installing prerequsities', '');
      ProgressPage.SetText('Installing DirectX...', '');
      ProgressPage.Show;
      try
        ExtractTemporaryFile('dxwebsetup.exe');
        StartWaitingForDirectXWindow;
        Exec(ExpandConstant('{src}\_Redist\dxwebsetup.exe'), '', '', SW_SHOW,
             ewWaitUntilTerminated, ResultCode);
      finally
        StopWaitingForDirectXWindow;
        ProgressPage.Hide;
      end;
    end;
  end;
end;

Answer 1

使用ShellExec 和runas 动词，而不是Exec：

ShellExec('runas', ExpandConstant('{src}\_Redist\dxwebsetup.exe'), '', '', SW_SHOW,
          ewWaitUntilTerminated, ResultCode);

当当前 Inno Setup 进程在没有管理员权限的情况下运行时，您将收到 UAC 提示。