Как проверять найденый ключь являеться ли
DWORD-ом?
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | Reg := TRegistry . Create;
try
Reg . RootKey := HKEY_CURRENT_USER;
Key := '\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\Explorer\Advanced' ;
if Reg . OpenKeyReadOnly(Key) then
begin
if Reg . ValueExists( 'Hidden' ) then
begin
RegKey := Reg . ReadInteger( 'Hidden' );
Reg . CloseKey;
edit1 . Text :=IntToStr(RegKey);
end ;
end ;
finally
Reg . Free
end ;
|
Проблема в том что если тип ключа
Hidden не окажеться
DWORD-ом а простым строковым параметром то прога даст ощибку - как проверить тип ключа???