Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

delphi ÐÞ¸Ä×¢²á±íµÄÎÊÌâ

delphi ÐÞ¸Ä×¢²á±íµÄÎÊÌâ 
procedure TForm1.Button1Click(Sender: TObject);
var 
      Info: INTERNET_PROXY_INFO;
      Reg : TRegistry;

    begin
    Reg := TRegistry.Create;
    try 
    Reg.RootKey := HKEY_USERS;
    if Reg.OpenKey('\S-1-5-21-515967899-839522115-1343024091-1003\Software\Microsoft\Windows\CurrentVersion\Internet Settings', False) then 
    begin 
        Reg.WriteString('ProxyServer', '60.254.188.10:80');
      Reg.WriteInteger('ProxyEnable', 1);
            end; 
    finally 
      Reg.CloseKey; 
      Reg.Free; 
    end;
Info.dwAccessType := INTERNET_OPEN_TYPE_PROXY; 
    Info.lpszProxy := PChar('60.254.188.10:80');
    InternetSetOption(nil, INTERNET_OPTION_PROXY, @Info, 1000);
    InternetSetOption(nil, INTERNET_OPTION_REFRESH, nil, 0);
    InternetSetOption(nil, INTERNET_OPTION_SETTINGS_CHANGED, nil, 0);
    webbrowser1.Navigate('http://www.ip138.com');
  end;


ÎÒÊÔͼÐÞ¸Ä
HKEY_US


Ïà¹ØÎÊ´ð£º

PythonÖеÄUnicodeÔÚDelphiÈçºÎ»¹Ô­³ÉGb2312£¿

ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ

ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô­³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......

Delphi ÏñÍö¹úµÄÄÏËΣ¬ÊÔÎÊÕâÓïÑÔ»¹ÓÐǰ;Âð£¿

Delphi ÏñÍö¹úµÄÄÏËΣ¬ÊÔÎÊÕâÓïÑÔ»¹ÓÐǰ;Âð£¿
Win32¿ª·¢²»ÈçC#£»
ÃæÏñ¶ÔÏñ¿ª·¢²»ÈçJAVA£»
ϵͳ¿ª·¢²»ÈçVC++6.0£»
ÄÜÓÃÐÔ²»ÈçVB6.0£»
²»Ö§³ÖWeb¿ª·¢¡£¡£¡£
³ö¸öDelphi 2010Ãâ·ÑÒ»Äê»áÓÐÈËÓÃÂ𣿠......

¹ãÖÝÐþÎä×ÊѶ¿Æ¼¼ÓÐÏÞ¹«Ë¾ÕÐdelphi³ÌÐòÔ±

ְλҪÇó£º
1£® ¼ÆËã»ú»òÏà¹Ø×¨Òµ±ÏÒµ£¬´óרÒÔÉÏѧÀú£»
2£® ÊìÁ·Ê¹ÓÃ.netºÍdelphi¿ª·¢¿Í»§¶Ë³ÌÐò£»
3£® ÊìϤaccess,Sql Server,Oracle,mysql,DB2µÈ¶àÖÖÊý¾Ý¿âϵͳ£¬ÊìÁ·ÕÆÎÕÊý¾Ý¿âÁ¬½Ó£¬Í¨¹ýSQLÓï¾ä¶ÔÊý¾Ý¿ ......

delphiÈçºÎÐ޸ľÖÓòÍø´úÀíºÍ¿í´ø²¦ºÅ´úÀí upÓзÖ

delphiÈçºÎÐ޸ľÖÓòÍø´úÀíºÍ¿í´ø²¦ºÅ´úÀí
ͬʱÐÞ¸ÄÁ½¸öµØ·½µÄ´úÀíÐÅÏ¢
up


up

UP

¿ÉÒÔÔÚ×¢²á±íÀïÃæÐ޸İɣ¬UP¡£

×¢²á±íÀïÐÞ¸Ä ºó Ð޸ĵÄÊǾÖÓòÍøµÄ´úÀí ²»ÊÇ¿í´ø²¦ºÅµÄ´úÀí

ÍøÉÏ˵  ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ