![]() |
|
#1
|
||||
|
||||
![]() Здравствуйте !!!
Подскажите, почему в Str не записывается значение из реестра, MenuHeight в реестре равно -285, а у меня показывает 'ничего', Str:='' Код: Код:
procedure TForm1.Button1Click(Sender: TObject); var reg:TregIniFile; Str:String; begin reg := TRegIniFile.Create; reg.RootKey := HKEY_CURRENT_USER; reg.OpenKey('Control Panel\Desktop\WindowMetrics', True); Str:=reg.ReadString('WindowMetrics','MenuHeight',' '); ShowMessage(Str); end; end. Skype: Lotles-XXXX ![]() |