Работа с Реестром

[dengul]

Соблюдая правила форума(искал похожие темы.качал архив вопросов),и не найдя решения проблемы, прошу помочь. Вот код:
//////////////////////////////////////////////////////////////////////////////////////
var reg:TRegistry;
begin
Reg:=TRegistry.Create;
With Reg do
Try
Begin
RootKey:=HKEY_CURRENT_USER;
OpenKey('HKEY_CURRENT_USER\Keyboard Layout\Preload',False);
If ValueExists('1') then
Begin
Edit1.Text:=IntToStr(ReadInteger('1 '));
WriteInteger('1',StrToInt(Edit1.Tex t));
End
Else
Begin
Edit1.Text:='параметр не существует';
WriteInteger('1',StrToInt(Edit1.Tex t));
End;
CloseKey;
End;
Finally
Reg.Destroy;
End;
end;
//////////////////////////////////////////////////////////////////////////////////////
суть: если обращаться к разделу HKEY_CURRENT_USER то программа выдаёт ошибку,что такого параметра несуществует, хотя он есть.А если обращаться к разделу HKEY_LOCAL_MACHINE то программа вообще не реагирует на события.
Работаю на WindowsXP под админом.

[mihali4]

Из правил:

Темы с вложениями вместо исходного кода, а также с неправильно оформленным кодом будут мгновенно закрываться, а нарушитель - получать нарушение №6 - "Нарушение правил форума" и штраф 6 очков.