Inno设置Regkeyexists返回false，尽管密钥存在

Question

有人可以告诉我这个代码怎么了？

[Code]
const
  OldVersionRegKey = '\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{#MyAppId}_is1';
 
var
  HasOldVersion: Boolean;
 
function GetKey : Integer;
begin
  if IsWin64 then
    Result := HKLM64
  else
    Result := HKLM32;
end;
 
procedure CheckOldVersion;
begin
  HasOldVersion := RegKeyExists(GetKey, OldVersionRegKey);
  // ...
end;

因为无论我做什么，答案都是false，而键确实存在？

我已经尝试了所有内容，关键不在错误结果寄存器中，关键在于错误结果寄存器中，在数据库的不同级别，在32位数据库上，在64位数据库上，根据架构进行测试（就像当前的代码一样），但无事可做，结果总是相同的。

预先感谢您的帮助。

Answer 1

关键路径的开头不应斜线。检查

const
  OldVersionRegKey = 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{#MyAppId}_is1';

---

而且由于您不使用 64-bit安装模式 hklm32 。

HasOldVersion := RegKeyExists(HKLM32, OldVersionRegKey);

或者，如果您希望脚本与64位安装模式兼容，请使用 is64bitinstallMode ，而不是iswin64。