delphi ÉèÖôúÀíÎÊÌâ ¼±
ÍøÉÏ¿´Á˺ܶàÌû×Ó ·½·¨¶¼Ò»Ñù µ÷ÊÔÆðÀ´¶¼²»ÐÐ
ËäÈ» IE Ñ¡ÏîÖÐÒѾÍê³ÉÁË ´úÀíµÄÉèÖÃ
µ«ÊÇ ·ÃÎÊÆðÀ´»¹ÊDz»ÐÐ Æ©Èç ·ÃÎÊwww.ip138.com
ÒѾÊDZ¾»úIP
ÎҵĴúÂë ¾ÍÊǸù¾ÝÍøÉÏÆÕ±éµÄ´úÂë ÐÞ¸ÄµÄ Çë¸ßÊÖ¹ýÄ¿
procedure TForm1.Button1Click(Sender: TObject);
var sProxy: string;
Pinfo: INTERNET_PROXY_INFO;
reg: Tregistry;
begin
Pinfo.dwAccessType := INTERNET_OPEN_TYPE_PROXY;
Pinfo.lpszProxy := pchar(trim(edit1.Text));
InternetSetOption(nil, INTERNET_OPTION_PROXY, nil, SizeOf(PInfo));
InternetSetOption(nil, INTERNET_OPTION_SETTINGS_CHANGED, nil, 0);
reg:=Tregistry.Create;
try
reg.RootKey := HKEY_CURRENT_USER;
if reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Internet Settings', true ) then
begin
reg.Writestring('ProxyServer', edit1.Text);
reg.WriteInteger('ProxyEnable', integer(true));
end
finally
reg.CloseKey;
reg.free;
webbrowser1.Navigate('http://www.google.com');
&n
Ïà¹ØÎÊ´ð£º
ÈçÌâ¡£
¸Ð¾õÈçºÎ£¿½»Á÷Ï¡£
ûÓÐÑо¿¹ý£¬ºÇºÇ
ÓÐɶÑо¿Í·£¿
ÄǸö¶«Î÷£¬ÊǸö¼¦Àߣ¬£¬Ã»ÓÐʲôÒâ˼£¬·¢ÏÖ£¡£¡
ÓÃÀ´×öB/S¼Ü¹¹µÄMISϵͳµÄ»°Ó¦¸Ã¿ÉÒÔÌá¸ß½çÃæ¿ª·¢µÄЧÂʰɣ¿
ÒòΪ²»ÊìϤDelphi £ ......
ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ
ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
ÕâÓïÑÔºÃÄѰ¡ ѧdelphi¼òµ¥ ¿Þ
Ò»¸ödll ºÍÒ»¸ö Ö¸Õ뺯Êýµ÷Óà ¸ãÁËÎÒ2Àñ°Ý »¹ÊÇÔÚÎÒÓÐdelphi»ù´¡µÄÇé¿öÏ ¿Þ
ÄÑ¶È ±È delphi ¸ßºÜ¶à¡£¼ÌÐøÅ¬Á¦Ñ§°¡¡£
ºÃÏñÒ²²¢²»±ÈdelphiÄѶàÉÙ°É
Ö÷Òª´úÂë ²»Ö±¹ÛÁË¡ ......
Delphi
ÔõÑù»ñÈ¡ÍøÒ³²¿·ÖÄÚÈÝ£¨´úÂ룩£¬²¢ÇÒÏÔʾ³öÀ´£¡
£¨Ö»ÊÇÍøÒ³ÀïÃæµÄÒ»²¿·ÖÄÚÈݲ¢²»ÊÇÈ«²¿£©
ûŪ¶®£¡
ÀàËÆwebseverµÄ¹¦ÄÜ£¿
¹À¼ÆÊÇÀûÓÃieµÄ½Ó¿Ú¡£¡£¡£¡£¡£¡£¡£¡£
ÊÇÀàËÆwebseverµÄ¹¦ÄÜ ......