Отладка скриптов .bat в установщиках Inno Setup: понимание и обработка ошибок

Delphi , Интернет и Сети , Браузер

При работе с установщиком Inno Setup может возникнуть необходимость выполнения дополнительных операций после завершения основной установки, в том числе и удаления файлов с помощью скриптов .bat. Однако, если при выполнении этих операций возникают ошибки, например, из-за отсутствия файлов или папок, установщик может завершиться без каких-либо сообщений. В данной статье мы рассмотрим, как можно отладить скрипты .bat для обработки и отображения сообщений об ошибках в контексте Inno Setup.

Проблема и контекст

Пользователь столкнулся с проблемой, что при выполнении скрипта .bat после завершения установки (CurStep = ssDone) для удаления файлов, если файлы или папки отсутствуют по указанному пути, установщик молча завершает работу. Пользователю необходимо отлавливать сообщения об ошибках, возникающие при удалении файлов, и выводить их.

Пример скрипта .bat для удаления файлов:

del "C:\archives\pages\*.txt"

Исходный код на Object Pascal (Delphi) для выполнения скрипта:

procedure CurStepChanged(CurStep: TSetupStep);
var
  ErrorCode: Integer;
begin
  if CurStep = ssDone then
  begin
    Log('Test'+ ExpandConstant('{tmp}\deletefiles.bat'))
    Exec(ExpandConstant('{tmp}\deletefiles.bat'), '', '',
         SW_HIDE, ewWaitUntilTerminated, ErrorCode);
    Log('Done')
  end;
end;

Альтернативный ответ

В контексте альтернативного ответа пользователь вновь описывает проблему, указывая на необходимость отлавливания ошибок при выполнении скрипта .bat в Inno Setup.

Подтвержденный ответ

Общий подход заключается в проверке переменной ErrorCode на ноль после выполнения внешней программы. Однако, команда del в Windows не возвращает код ошибки, если файлы не существуют или возникли другие проблемы при удалении. Для получения информации об ошибках необходимо использовать другие методы.

Решение

Для решения проблемы можно использовать следующий подход:

1. Изменить логику удаления файлов, выполнив его напрямую в скрипте Inno Setup, вместо использования внешнего скрипта .bat.
2. Отлавливать вывод команды del для получения информации об ошибках.

Пример кода на Object Pascal для удаления файлов напрямую:

procedure CurStepChanged(CurStep: TSetupStep);
var
  FindRec: TFindRec;
begin
  if CurStep = ssDone then
  begin
    if not FindFirst('C:\path\*.txt', FindRec) then
    begin
      Log('Not found any files');
    end
    else
    begin
      try
        repeat
          if DeleteFile('C:\path\' + FindRec.Name) then
          begin
            Log(Format('Deleted %s', [FindRec.Name]));
          end
          else
          begin
            MsgBox(Format('Cannot delete %s', [FindRec.Name]), mbError, MB_OK);
          end;
        until not FindNext(FindRec);
      finally
        FindClose(FindRec);
      end;
    end;
  end;
end;

Также, если нет необходимости выполнять удаление файлов в шаге ssDone, можно использовать секцию [InstallDelete], которая предназначена для удаления файлов и папок.

Пример использования секции [InstallDelete]:

[InstallDelete]
Type: files; Name: "C:\path\*.txt"

Заключение

Для эффективной отладки и обработки ошибок в скриптах .bat при использовании Inno Setup, рекомендуется использовать встроенные возможности установщика, такие как прямая работа с файлами и использование секции [InstallDelete]. Это позволит избежать сложностей с отлавливанием ошибок и сделает процесс установки более надежным.

Создано по материалам из источника по ссылке.

одним предложением: При работе с установщиком Inno Setup необходимо правильно отлаживать скрипты .bat для корректной обработки и отображения ошибок при удалении файлов после основной установки.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Браузер ::