[JeReK5542]

Здравствуйте!
Есть такой код:

Procedure EnableProxy(const Server: String);
var
Reg : TRegistry;
begin
Reg := TRegistry.Create;
Reg.OpenKey('Software\Microsoft\Windows\CurrentVer sion\Internet Settings',False);
Reg.WriteBool('ProxyEnable',True);
Reg.WriteString('ProxyServer',Server);
Reg.WriteString('ProxyOverride', '<local>');
Reg.CloseKey;
Reg.Free;
InternetSetOption(0, INTERNET_OPTION_SETTINGS_CHANGED, 0, 0);
InternetSetOption(0, INTERNET_OPTION_REFRESH, 0, 0);
end;

Procedure DisableProxy;
var
Reg : TRegistry;
begin
Reg := TRegistry.Create;
Reg.OpenKey('Software\Microsoft\Windows\CurrentVer sion\Internet Settings',False);
Reg.DeleteValue('ProxyServer');
Reg.DeleteValue('ProxyOverride');
Reg.WriteBool('ProxyEnable',False);
Reg.CloseKey;
Reg.Free;
InternetSetOption(0, INTERNET_OPTION_SETTINGS_CHANGED, 0, 0);
end;

программа запускаеться без ошибок, данные в реестр добавляет, но прокси в ie не отображаеться( как решить ету проблему? почему ie не грузит настройки прокси из реестра, которые я добавил?
ОС: windows 7

Запускаю функции так:

EnableProxy('serverort');

DisableProxy;

[NumLock]

Код:

procedure TForm1.Button1Click(Sender: TObject);
const
  Server = 'php.net:80';
var
  Reg : TRegistry;
begin
  Reg := TRegistry.Create;
  Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Internet Settings',False);
  Reg.WriteInteger('ProxyEnable',1);
  Reg.WriteString('ProxyServer',Server);
  Reg.CloseKey;
  Reg.Free;
  InternetSetOption(nil, INTERNET_OPTION_SETTINGS_CHANGED, nil, 0);
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  Reg : TRegistry;
begin
  Reg := TRegistry.Create;
  Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Internet Settings',False);
  Reg.DeleteValue('ProxyServer');
  Reg.DeleteValue('ProxyOverride');
  Reg.WriteInteger('ProxyEnable',0);
  Reg.CloseKey;
  Reg.Free;
  InternetSetOption(nil, INTERNET_OPTION_SETTINGS_CHANGED, nil, 0);
end;

работает на Windows 7, 32-bit, IE11

[JeReK5542]

не работает( код выполняеться, а в ie прокси как небыло так и нету
непойму в чем проблема

[M.A.D.M.A.N.]

Проблема в вашей машине, если уж так надо, просите, чтоб кто-нибудь вам по РДП подрубился и проверил, чего это вдруг рабочий код не работает.

[JeReK5542]

Разобрался, где находиться путь для настроек proxy IE:
HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Internet Settings\Connections

только пока непонял как с помощью writebinarydata запись туда данные и как узнать имя соединения

[NumLock]

проверил еще на Windowx XP IE 6 и Windows 7 64-bit IE 8 - работает

[JeReK5542]

у меня в Software\Microsoft\Windows\CurrentVersion\Internet Settings храняться настройки lan соединения в вот настроки прокси ie в
Software\Microsoft\Windows\CurrentVersion\Internet Settings\Connections Имя Соединения)
я уже разобрался, закрывайте тему, спасибо кто откликнулся)

[NumLock]

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

разобрался

непохоже:
Internet Settings (Internet Explorer 5 and 6)
Internet Explorer 8 and Internet Explorer 9 Registry Keys