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

[Code]
function IsJREInstalled(): Boolean;
var
  javaKey: string;
begin
  // 检查注册表中的JRE安装信息
  javaKey := 'SOFTWARE\JavaSoft\Java Runtime Environment';
  Result := RegKeyExists(HKEY_LOCAL_MACHINE, javaKey);
end;

procedure InitializeWizard();
begin
  // 检查JRE是否存在
  if not IsJREInstalled() then
  begin
    // 提示用户下载JRE
    MsgBox('您的计算机上未安装Java Runtime Environment (JRE)。请点击确定按钮下载并安装JRE。', mbInformation, MB_OK);

    // 打开JRE下载链接
    ShellExec('open', 'https://www.oracle.com/java/technologies/javase-jre8-downloads.html', '', '', SW_SHOW, ewNoWait, ErrorCode);
  end;
end;