如何在Inno Setup运行时获取[Setup]段WizardStyle指令的值？

你尝试用ExpandConstant('{WizardStyle}')无效的原因是：WizardStyle是编译时的预处理器指令，并非运行时可通过ExpandConstant解析的标准常量。要在Pascal脚本中实现对应逻辑，需要通过预处理器将WizardStyle的值注入到代码中，以下是两种可行方案：

方案一：直接在代码段使用预处理器条件编译 #

利用预处理器的GetSetupSetting函数读取[Setup]段的WizardStyle值，然后通过预处理器条件分支生成对应代码：

// 先通过预处理器获取[Setup]段的WizardStyle值
#define WizardStyle GetSetupSetting("WizardStyle")

procedure InitializeWizard();
begin
  {% if WizardStyle = 'Modern' %}
    // 现代向导风格下执行的代码
    MsgBox('当前使用现代向导风格', mbInformation, MB_OK);
  {% elif WizardStyle = 'Classic' %}
    // 经典向导风格下执行的代码
    MsgBox('当前使用经典向导风格', mbInformation, MB_OK);
  {% endif %}
end;

这种方式在编译阶段就确定了要生成的代码分支，运行时直接执行对应逻辑，效率最高。

方案二：将预处理器值赋值给脚本变量（运行时判断） #

如果需要在运行时动态访问WizardStyle的值，可以先通过预处理器把值注入到脚本变量中，再进行判断：

// 预处理器读取WizardStyle值
#define WizardStyleValue GetSetupSetting("WizardStyle")

var
  CurrentWizardStyle: string;

procedure InitializeWizard();
begin
  // 将预处理器值赋值给脚本变量
  CurrentWizardStyle := '{{WizardStyleValue}}';
  
  if CurrentWizardStyle = 'Modern' then
  begin
    // 现代风格执行逻辑
  end
  else if CurrentWizardStyle = 'Classic' then
  begin
    // 经典风格执行逻辑
  end;
end;

注意事项 #

• 确保[Setup]段已经正确定义了WizardStyle指令（值为Modern或Classic）；
• 预处理器指令#define必须写在脚本的最开头部分（在任何段之前）。

内容的提问来源于stack exchange，提问作者ElektroStudios