如何检查注册表项是否存在

我不知道我的错误在哪里。它总是跳到else分支，但是密钥存在，我检查了几次。

var
  reg : TRegistry;
begin
    with TRegistry.Create do try
      RootKey:=HKEY_CURRENT_USER;
      OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run', False);
    if KeyExists('nginx.exe') then begin
      ShowMessage('Ja geht ist da');
      Result := True;
      btnAutostart.ImageIndex := 5
    end
    else begin
      Result := False;
      btnAutostart.ImageIndex := 0;
    end;
    finally
      Free;
    end;
end;

你需要打电话ValueExists而不是KeyExists。键是 Regedit 中显示为文件夹的内容，但您正在寻找名为的值nginx.exe在钥匙里HKCU\Software\...\Run.

其他一些评论：

1. 由于您仅从注册表中读取，因此使用OpenKeyReadOnly而不是OpenKey.
2. 检查返回值OpenKeyReadOnly万一钥匙打不开。
3. 如果您确实需要使用 HKLM 执行此操作（如您在评论中所述），请在 64 位系统上运行 32 位进程时注意注册表重定向混乱。