![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
![]() Почему не возможно читать значение ключа??
Код:
Reg := TRegistry.Create; try Reg.RootKey := HKEY_CURRENT_USER; Key := 'Software\Microsoft\Windows\CurrentVersion\Policies\Explоrer'; if Reg.OpenKeyReadOnly(Key) then begin if Reg.ValueExists('StartMenuLogOff') then begin RegKey := Reg.ReadInteger('StartMenuLogOff'); Reg.CloseKey; edit1.Text :=inttostr(RegKey); end else edit1.Text:=''; end; finally Reg.Free end; |