【Inno Setup】检测是否需要预先重启

function IsRestartPending: Boolean;
var
  S: string;
begin
  if RegQueryMultiStringValue(
       HKLM, ‘SYSTEM\CurrentControlSet\Control\Session Manager‘,
       ‘PendingFileRenameOperations‘, S) then
  begin
    Log(Format(‘PendingFileRenameOperations value exists with value [%s]‘, [S]));
    Result := (Trim(S) <> ‘‘); { This additional check is probably not needed }
  end
    else
  begin
    Log(‘PendingFileRenameOperations value does not exist‘);
    Result := False;
  end;
end;

function InitializeSetup(): Boolean;
begin
  if IsRestartPending then
  begin
    MsgBox(‘Restart your machine please‘, mbError, MB_OK);
    Result := False;
    Exit;
  end;

  Result := True;
end;