Настройка Inno Setup для изменения ассоциаций файлов с учётом выбора пользователя

Delphi , ОС и Железо , Windows

Inno Setup – это мощный инструмент для создания установщиков под Windows. Одной из возможностей Inno Setup является изменение ассоциаций файлов, что позволяет автоматически открывать файлы определённого типа с помощью установленного приложения. Однако, в некоторых случаях, может возникнуть необходимость выполнять эту операцию только при определённых условиях, например, при полном установке, но не при распаковке портативной версии программы.

Проблема

Пользователь хочет, чтобы Inno Setup изменял ассоциации файлов только в том случае, если пользователь выбрал полную установку программы. При распаковке портативной версии таких изменений производить не следует.

Решение

Для решения этой задачи необходимо использовать функцию CurStepChanged(ssPostInstall), которая вызывается после завершения установки. В этой функции можно вызвать WinAPI функцию SHChangeNotify, которая уведомляет систему об изменении ассоциаций файлов.

[Code]

const
  SHCNE_ASSOCCHANGED = $08000000;
  SHCNF_IDLIST = $00000000;

procedure SHChangeNotify(wEventID: Integer; uFlags: Cardinal; dwItem1, dwItem2: Cardinal);
  external 'SHChangeNotify@shell32.dll stdcall';

procedure CurStepChanged(CurStep: TSetupStep);
begin
  if CurStep = ssPostInstall then
  begin
    if installation then
      SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, 0, 0);
  end;
end;

function installation: Boolean;
begin
  Result := InstallChecked; { Проверяем чекбокс на полную установку }
end;

function portable: Boolean;
begin
  Result := PortableChecked; { Пример для функции проверки портативного режима }
end;

Убедитесь, что вы заменили InstallChecked и PortableChecked на актуальные идентификаторы элементов пользовательского интерфейса, которые отображают выбор пользователя.

Важно отметить, что начиная с определенной версии Inno Setup, вы можете использовать более простой подход:

[Setup]
ChangesAssociations=installation

[Code]
function installation: Boolean;
begin
  Result := InstallChecked; { Только если полная установка выбрана }
end;

Это упрощает настройку и делает код более читаемым.

Заключение

Используя подходы, описанные выше, вы можете гибко настраивать поведение Inno Setup в соответствии с выбором пользователя, что позволяет создавать установщики, которые лучше соответствуют потребностям ваших пользователей.

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

Пользователь желает настроить Inno Setup так, чтобы изменение ассоциаций файлов происходило только в случае, если пользователь выбрал полную установку программы, а не при распаковке портативной версии.

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

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

:: Главная :: Windows ::