Поменять значение ключа в реестре

[ikot]

На форме есть две кнопки. Как сделать так, чтобы при нажатии на одну из них в ветке реестра
HKEY_CURRENT_USER\Software\Microsof t\Windows\CurrentVersion\Internet settings поменялся ключ ProxyEnable, а именно получил значение, символизирующее о неактивности прокси-сервера.

При нажатии на другую кнопку нужно наоборот - включить прокси-сервер.

[Izhic]

var
R : TRegistry;
StrName : String;
begin
StrName:=''
R := TRegistry.Create;
try
if not R.OpenKey(
'HKEY_CURRENT_USER\Software\Microso f t\Windows\CurrentVersion\Internet settings', False )
then Exit;
try
R.WriteString( 'ProxyEnable', StrName );
finally
R.CloseKey;
end;
finally
R.Free;
end;
end;

[ikot]

А разве это "проконает", там же тип DWORD, а вы пользуетесь WriteString?

[Izhic]

Ну я же не смотрел что там

Просто поменяйте на ваш тип
Reg.WriteInteger ( 'DWORD' , StrToInt ( Edit1.Text ) );

[ikot]

Сообщение от Izhic

Ну я же не смотрел что там

Просто поменяйте на ваш тип
Reg.WriteInteger ( 'DWORD' , StrToInt ( Edit1.Text ) );

Извините, может я не понял, но первый параметр точно DWORD?

[Izhic]

Верно говорите, там :'ProxyEnable'