Delphi Dünyası Facebook'ta

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

Gönderen Konu: Proxy ayarlarına değer atama  (Okunma sayısı 1048 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı denizfatihi

  • Delphi 1 Level 5
  • *****
  • İleti: 40
  • Rep: +0/-0
Proxy ayarlarına değer atama
« : 23 Şubat 2010 15:08:36 »
Herkese Merhaba,

Delphi üzerinden IE proxy ayarları kısmına değer atamak istiyorum, ilginiz ve yardımlarınız için şimdiden tşk.



« Son Düzenleme: 23 Şubat 2010 16:56:57 by denizfatihi »

Çevrimdışı barutali

  • Administrator
  • *****
  • İleti: 2.229
  • Rep: +55/-0
  • Cinsiyet: Bay
  • Falan filan ...
  • Delphi Sürümü: 2010 - XE2
Ynt: Proxy ayarlarına değer atama
« Yanıtla #1 : 26 Şubat 2010 03:28:40 »
yanlış bilmiyorsam regeditte saklıyor ... regeditteki yerini bulursan ve regedite veri yazma yoluyla değiştirebilirsin ...
Forumda daha önce regedit ile ilgili bir çok konu geçti... arama yaparsan istediğin sonuca ulaşabilirsin ..


Kolay gelsin .



Amatör Küme Programcı

Çevrimdışı denizfatihi

  • Delphi 1 Level 5
  • *****
  • İleti: 40
  • Rep: +0/-0
Ynt: Proxy ayarlarına değer atama
« Yanıtla #2 : 26 Şubat 2010 22:31:41 »
cevap için teşekkürler, yanlız bu süre zarfında ben bulmuştum, başka birinin de işine yarar diye aşağda kodları veriyorum.

herkese kolay gelsin

procedure TForm1.Button3Click(Sender: TObject);
var
Reg1:TRegistry;
begin
Reg1:=TRegistry.Create;
Reg1.RootKey:=HKEY_CURRENT_USER;
Reg1.OpenKey('Software\Microsoft\Windows\CurrentVersion\Internet Settings',true);
Reg1.WriteString('Proxyserver',edit1.Text);
Reg1.CloseKey;
Reg1.RootKey:=HKEY_CURRENT_USER;
Reg1.OpenKey('Software\Microsoft\Windows\CurrentVersion\Internet Settings',true);
Reg1.WriteInteger('proxyEnable',1);
Reg1.CloseKey;
Reg1.Free;