Question: I do not understand. There is a window registry key of firebird server I want to check if it exists. The key exists but the function returns false.
What is wrong? I'm using Windows 7 64x with delphi 2010.

Tks.
Davis.

```
procedure x;
  var
    reg:TRegistry;
begin

  reg := TRegistry.Create;
  reg.RootKey := HKEY_LOCAL_MACHINE;

  if reg.OpenKey('\SOFTWARE\Firebird Project\Firebird Server\Instances',false)=true then
  begin
    ShowMessage('Key exists');
  end;

end;

```

Answer: 
Try replacing

```
TRegistry.Create

```

with

```
TRegistry.Create(KEY_READ)

```
Try to run your application as administrator.
I think this will solve your problem.