[IRBIS_RZN]

Добрый вечер, уважаемые знатоки!
Подскажите как считать у ветки (ключа) реестра параметр "(По умолчанию)"?
Например, у ключа реестра "HKEY_CLASSES_ROOT\.exe" параметр "(По умолчанию)" - "exefile".

[BoRoV]

Код:

var
  reg: TRegistry;
begin
  reg := TRegistry.Create;
  try
    reg.RootKey := HKEY_CLASSES_ROOT;
    if reg.OpenKeyReadOnly('.exe') then
      ShowMessage(reg.ReadString(''));
  finally
    reg.Free;
  end;
end;

[IRBIS_RZN]

Спасибо!
Работает.
Сначала попробовал аналогично в своей программе считать параметр "(По умолчанию)", ничего не получилось. Потом понял в чем допустил ошибку.
Я до этого считываю значение из другой ветки реестра и забыл вставить CloseKey.