易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi bypass 是什么意思

procedure ChangeProxy(Addr: string; Bypass, Enabled: Boolean); 
    var 
      Info: INTERNET_PROXY_INFO; 
      Reg : TRegistry; 
    begin 
    Reg := TRegistry.Create; 
    try 
    Reg.RootKey := HKEY_CURRENT_USER; 
    if Reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Internet Settings', False) then 
    begin 
        Reg.WriteString('ProxyServer', Addr); 
      Reg.WriteInteger('ProxyEnable', Integer(Enabled)); 
   
        if Bypass then 
          Reg.WriteString('ProxyOverride', ' <local>') 
        else 
        Reg.DeleteValue('ProxyOverride'); 
      end; 
    finally 
      Reg.CloseKey; 
      Reg.Free; 
    end; 
   
    Info.dwAccessType := INTERNET_OPEN_TYPE_PROXY; 
    Info.lpszProxy := PChar(Addr); 
    InternetSetOption(nil, INTERNET_OPTION_PRO


相关问答:

Delphi 像亡国的南宋,试问这语言还有前途吗?

Delphi 像亡国的南宋,试问这语言还有前途吗?
Win32开发不如C#;
面像对像开发不如JAVA;
系统开发不如VC++6.0;
能用性不如VB6.0;
不支持Web开发。。。
出个Delphi 2010免费一年会有人用吗? ......

delphi浅显问题


大家帮看下  这个图片中 显示的是什么,双击可以打开一个窗体,但窗体时固定的,这个东西有什么用  谢谢了
http://hi.csdn.net/space-2158731-do-album-picid-427006.html
图片没显示出来



......

delphi WITH DO的问题

procedure TForm2.Button1Click(Sender: TObject);
var
  i:integer;
begin
SetLength(a,200);
for I := 0 to 199 do
begin
A[i]:=Tedit.Create(self);
  with A[i] do
&n ......

delphi内存池 实现

delphi 下可有源码 实现内存池 固定分配内存池大小的。。内存池满后自动转储数据到。。指定的一个临时文件,

不知道可否哪位兄弟做过类似的例子。。。。。最好有演示源码。。。谢谢
搜一搜,总会有...

......

delphi 异步线程

delphi 异步线程怎么怎么实现?
请各位大佬帮忙!
最好有个实例!
多谢

你不同步就是异步了,还写啥

默认情况下,线程就是异步的…………*^_^*

估计楼主同步和异步概念都没弄清

真无语。。可 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号