Inno Setup中指定Python版本检测及按需安装脚本实现方案

嘿，我来帮你搞定这两个Inno Setup相关的Python检测与自动安装问题，这在打包依赖特定Python版本的桌面应用时特别实用！

Python默认安装时会把自身信息写入系统注册表，我们可以通过读取注册表项来判断目标版本是否已安装。以你提到的32位Python 3.6.8为例，具体实现如下：

• 编写Pascal脚本检测函数：
  Inno Setup支持内置的Pascal脚本，我们可以写一个自定义函数，先检查对应版本的Python注册表路径是否存在，还能可选验证精确版本号。

  示例函数：

  function CheckPython368x86Installed: Boolean;
  var
    PythonPath: String;
    InstalledVersion: String;
  begin
    Result := False;
    // 32位Python的注册表路径：32位系统直接用HKLM，64位系统下32位安装程序会自动映射到Wow6432Node
    if RegQueryStringValue(HKLM, 'Software\Python\PythonCore\3.6-32\InstallPath', '', PythonPath) then
    begin
      // 可选：验证是否是精确的3.6.8版本
      if RegQueryStringValue(HKLM, 'Software\Python\PythonCore\3.6-32\Version', '', InstalledVersion) then
      begin
        Result := (InstalledVersion = '3.6.8');
      end
      else
      begin
        // 如果版本号项不存在，至少确认安装路径存在（兼容部分自定义安装场景）
        Result := True;
      end;
    end;
  end;
  

• 函数细节说明：

  • HKLM：对应全局安装的Python，如果是用户级单独安装，需要换成HKCU
  • 3.6-32：这是Python官方注册表中标识32位3.6.x版本的后缀，64位版本则用3.6（不带-32）
  • 先检测InstallPath确认Python已安装，再通过Version项验证精确版本，兼顾兼容性和准确性

有了上面的检测函数，我们就能在安装脚本里添加条件执行逻辑，让Python安装包只在检测失败时运行。

完整示例脚本如下：

[Setup]
AppName=你的应用名称
AppVersion=1.0
DefaultDirName={pf}\你的应用名称
OutputDir=Output
OutputBaseFilename=Setup

[Files]
; 打包你的应用程序文件
Source: "YourApp.exe"; DestDir: "{app}"
; 把Python安装包打包到临时目录
Source: "python-3.6.8.exe"; DestDir: "{tmp}"

[Run]
; 仅当未检测到32位Python 3.6.8时，自动执行Python静默安装
Filename: "{tmp}\python-3.6.8.exe"; Parameters: "/quiet InstallAllUsers=1 PrependPath=1"; \
  Flags: waituntilterminated; Check: not CheckPython368x86Installed

[Code]
; 放入之前编写的检测函数
function CheckPython368x86Installed: Boolean;
var
  PythonPath: String;
  InstalledVersion: String;
begin
  Result := False;
  if RegQueryStringValue(HKLM, 'Software\Python\PythonCore\3.6-32\InstallPath', '', PythonPath) then
  begin
    if RegQueryStringValue(HKLM, 'Software\Python\PythonCore\3.6-32\Version', '', InstalledVersion) then
    begin
      Result := (InstalledVersion = '3.6.8');
    end
    else
    begin
      Result := True;
    end;
  end;
end;

; 可选：安装前给用户提示即将安装Python
function InitializeSetup: Boolean;
begin
  Result := True;
  if not CheckPython368x86Installed then
  begin
    MsgBox('检测到系统未安装32位Python 3.6.8，安装程序将自动为您安装。', mbInformation, MB_OK);
  end;
end;

关键细节说明：

• Python安装包处理：通过[Files]项把python-3.6.8.exe打包到安装临时目录{tmp}，避免用户手动下载
• 静默安装参数：/quiet实现无界面安装，InstallAllUsers=1设置全局安装，PrependPath=1把Python添加到系统环境变量
• 条件执行：Check: not CheckPython368x86Installed确保只有未检测到目标Python时，才执行安装操作
• 前置提示：InitializeSetup函数可以在安装开始前给用户一个友好提示，避免困惑

注意事项：

• 如果用户自定义安装Python时未勾选“Register Python”选项，注册表项不会生成，这种情况检测会失效，建议在应用文档中说明推荐默认安装Python
• 若需检测64位Python，只需把注册表路径中的3.6-32改成3.6即可，同时注意Inno Setup安装程序的位数（64位安装程序访问HKLM不需要Wow6432Node映射）

内容的提问来源于stack exchange，提问作者Georg W.