0

Подскажите пожалуйста, как в Inno Setup запустить файл из кода и подождать его завершения, а так же узнать код завершения для запускаемого приложения?

1 ответ 1

0

Для этого вам нужно использовать функцию Exec.

В документации есть пример:

var
  ResultCode: Integer;
begin
  // Launch Notepad and wait for it to terminate
  if Exec(ExpandConstant('{win}\notepad.exe'), '', '', SW_SHOW,
     ewWaitUntilTerminated, ResultCode) then
  begin
    // handle success if necessary; ResultCode contains the exit code
  end
  else begin
    // handle failure if necessary; ResultCode contains the error code
  end;
end;

Здесь нужно обратить внимание на переменную ResultCode она передаётся в функцию по ссылке, и после выполнение функции в неё будет записан код завершения.

Флаг ewWaitUntilTerminated заставляет ожидать завершение вызванной команды.

Вот пример установки MSI пакета:

procedure InstallMsi(FilePath, InstallFolderPath: string; var RebootRequired: boolean);
var
    ResultCode: integer;
begin
  Exec('msiexec.exe', '/quiet /i "' + FilePath + '" AGREETOLICENSE=yes INSTALLFOLDER="' + InstallFolderPath + '"' , '', SW_SHOW, ewWaitUntilTerminated, ResultCode)
  if ResultCode = ERROR_SUCCESS_REBOOT_REQUIRED then
    RebootRequired := true
  else if ResultCode <> ERROR_SUCCESS then
    RaiseException(CustomMessage('MsiInstallationError'));
end;

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge you have read our privacy policy.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.