Inno 设置:如何检查 JRE 是否存在，如果不存在，则提示下载

Question

我正在使用Inno Setup为Java 64位应用程序开发安装程序。

使用Inno Setup可以检查计算机中是否存在Java 64位，如果没有，则向用户显示下载Java 64位的链接？

我应该向Inno Setup脚本添加什么来实现该行为？

Answer 1

下面你可以找到一个脚本，可以检查是否安装了JRE，然后提示用户一条消息 我用这篇堆栈溢出帖子作为参考： 如何从 Inno 安装程序安装 JRE？

[Code]
{ Script to check if a JRE is installed }
function InitializeSetup(): Boolean;
var
  ErrorCode: Integer;
  JavaVer: string;
begin
    RegQueryStringValue(
        HKLM, 'SOFTWAREJavaSoftJava Runtime Environment', 'CurrentVersion', JavaVer);
    Result := (Length(JavaVer) > 0);
    if not Result then
    begin
        if MsgBox('YOUR MESSAGE GOES HERE', mbConfirmation, MB_YESNO) = idYes then
        begin
            ShellExec(
              'open', 'https://www.java.com/en/download/manual.jsp#win',
              '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
        end;
    end;
end;