تنظیم proxy از داخل برنامه با دلفی 7

سلام دوستای خوبم
من یه برنامه نوشتم که قبل از اجرا باید proxy در قسمتconnection داخل internet option تغییر کنه
کسی از دوستان می تونه کمک کنه؟

از دستورات زیر استفاده کنید :
تنظیم پراکسی برای اینترنت اکسپلورر :

کد:

---

uses registry;
.
.
.


Procedure EnableProxy(Server1: String);
var
  Reg : TRegistry;
begin
  Reg := TRegistry.Create;
  Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Internet Settings',False);
  Reg.WriteString('ProxyServer',Server1);
  Reg.WriteBool('ProxyEnable',True);
  Reg.CloseKey;
  Reg.Free;
  InternetSetOption(0, INTERNET_OPTION_SETTINGS_CHANGED, 0, 0);
end;
.
.
.
.

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

---

ممنون از کمکتون