title: How to read Default Value of Registry Key
body: <p>I am having one Delphi XE2 project to work something with registry key. So I have defined the following codes :</p>
  
  <pre><code>procedure TMainForm.BitBtn01Click(Sender: TObject);
  var
    RegistryEntry: TRegistry;
  begin
    RegistryEntry := TRegistry.Create(KEY_READ or KEY_WOW64_64KEY);
    RegistryEntry.RootKey:= HKEY_LOCAL_MACHINE;
    if (not RegistryEntry.KeyExists('Software\MyCompanyName\MyName\')) then
      begin
        RegistryEntry.Access:= KEY_WRITE or KEY_WOW64_64KEY;
        RegistryEntry.OpenKey('Software\MyCompanyName\MyName\',True);
        RegistryEntry.WriteString('', 'MyFirstProject');
      end
    else
      begin
        Memo01.Lines.Add(RegistryEntry.ReadString('(Default)')); //Not Working
        Memo01.Lines.Add(RegistryEntry.ReadString('')); //Not Working
        Memo01.Lines.Add(RegistryEntry.ReadString('@')); //Not Working
      end;
    RegistryEntry.CloseKey();
    RegistryEntry.Free;
  end;
  </code></pre>
  
  <p>My requirement is to check the Default Value of "MyName" and to show in Memo01. But nothing is heppening. So I have tried another way as follows :</p>
  
  <pre><code>procedure TMainForm.BitBtn01Click(Sender: TObject);
  var
    RegistryEntry: TRegistry;
    RegistryString: string;
  begin
    RegistryEntry := TRegistry.Create(KEY_READ or KEY_WOW64_64KEY);
    RegistryEntry.RootKey:= HKEY_LOCAL_MACHINE;
    if (not RegistryEntry.KeyExists('Software\MyCompanyName\MyName\')) then
      begin
        RegistryEntry.Access:= KEY_WRITE or KEY_WOW64_64KEY;
        RegistryEntry.OpenKey('Software\MyCompanyName\MyName\',True);
        RegistryEntry.WriteString('', 'MyFirstProject');
      end
    else
      begin
        RegistryString := RegistryEntry.ReadString('(Default)'); //Not Working
        RegistryString := RegistryEntry.ReadString(''); //Not Working
        RegistryString := RegistryEntry.ReadString('@'); //Not Working
        Memo01.Lines.Add(RegistryString);
      end;
    RegistryEntry.CloseKey();
    RegistryEntry.Free;
  end;
  </code></pre>
  
  <p>But it is also not working.</p>