C# Delphi´¦Àí·ÖÎöQQÐÒé
C# Delphi´¦Àí·ÖÎöQQÐÒé
¡¡´ó¼Ò˵µ½QQÐÒé¶¼¾õµÃºÜÉñÃØ£¬ÊÇÒòΪQQ²»ÏñMSN»òÕßICQÐÒé¶¼ÒѾ¹Ù·½¹«²¼ÁË£¬¶øQQµÄûÓй«²¼¡£Ñо¿ËüµÄÈËÒ²²»ÊÇÌØ±ðµÄ¶à£¬ËäÈ»ÒѾÓÐÁË»ùÓÚ QQÐÒéËùд³ÉµÄµÚÈý·½Èí¼þ foicq, qq plugins for gaim, LumaQQ£¬µ«ÊÇÓÉÓÚËûÃÇÊÇ»ùÓÚ¶þ½øÖÆStreamµÄÐÒé¹ýÓÚ¸´ÔÓ£¬´ó¼ÒÔĶÁ´úÂëÒ²ÓÐÒ»¶¨µÄÄѶȣ¬ÔÙ¼ÓÉÏÍøÂçÉϽâÎöQQÐÒéµÄÎÄÕÂÒ²²»ÊÇÊ®·Ö¶à£¬ËùÒÔ»ùÓÚQQÍøÂçÐÒéµÄÓ¦ÓóÌÐòÒ²ÊÇÁÈÁÈÎÞ¼¸µÄ¡£ÏÖÔÚÎҾͰѻùÓÚHTTPµÄQQÐÒé½øÐÐÒ»¸ö´ÖdzµÄÆÊÎö£¬Ï£Íû¶Ô´ó¼ÒÓÐËù°ïÖú¡£Ô´Â벿·Ö¾ÍÓÃÎÒϲ»¶µÄDELPHI ºÍÏÖÔڱȽÏÁ÷ÐеÄC#ÓïÑÔ¶ÔQQÐÒéµÄʵÏÖ½øÐоßÌå·ÖÎö¡£
¡¡¡¡1¡¢ÕÒѰ֧³ÖQQ HTTPÐÒéµÄ·þÎñÆ÷¡£
¡¡¡¡´ó¼ÒÒ²Ðí»á±»Ò»Ð©¼ÙÏñËùÃÔ»ó£¬Ò²Ðí»áÈÏΪQQµÄHTTP·þÎñÆ÷ÊÇ»ùÓÚ80¿Ú½øÐÐͨÐŵÄ(È磺218.17.209.23:80)£¬Æäʵ²»È»£¬ÕýÕæ»ùÓÚHTTPµÄ·þÎñÆ÷Ó¦¸ÃÊÇ£ºhttp://tqq.tencent.com:8000£¬ËüÊÇÒ»¸öͨ¹ý8000¿Ú½øÐÐͨѶµÄ·þÎñÆ÷¡£
¡¡¡¡ÓÉÓÚQQµÄHTTP·þÎñÆ÷²¢²»Ö§³ÖHTTPÐÒéÖÐGET·½·¨£¬ËüÖ§³ÖPOST·½·¨¡£ËùÒÔÎÒÃÇÒª¸øQQµÄHTTPÐÒé´«²ÎÊý£¬ÄÇô¾Í±ØÐèÒªÓÃPOST·½Ê½²ÅÐС£
¡¡¡¡2¡¢C#ºÍDELPHIÊÇʵÏÖHTTPµÄPOST·½·¨µÄͨÐÅ¡£
¡¡¡¡C#£º
¡¡¡¡C#ÀïSystem.Web¿Õ¼äÏÂÌṩÁËÒ»¸ö½Ð×öWebClientµÄ¶ÔÏó£¬Ê¹Óô˶ÔÏó¾Í¿ÉÒÔʹC#Ö±½Ó¶Ô·þÎñÆ÷·¢ËÍWEB¿Í»§¶ËµÄÇëÇó¡£ÄÇôÎÒÃÇÒª¶Ô·þÎñÆ÷Ìá½»POST·½·¨ÄÇô¾Í±ØÐëʹÓÃÆäUploadData()·½·¨²ÅÐС£Ê×ÏȰÑÒªÇëÇóµÄÐÅÏ¢ÏÈת»»Îª×Ö½Ú(ÒòΪPOSTÌá½»µÄÊÇ×Ö·ûµÄÁ÷Êý¾Ý)£¬È»ºóÔÙ×öΪUploadData()µÄ²ÎÊý¡£Ê¹ÓÃUploadData()½øÐÐÊý¾ÝÌá½»£¬×îºó·µ»Ø£¬POSTµÄ»ØÀ¡ÐÅÏ¢¡£ÈçÏ£º
¡¡WebClient _client = new WebClient();
¡¡¡¡string postValues = "VER=1.0&CMD=Query_Stat&SEQ=12321&UIN=29501213&TN=50&UN=0";
¡¡¡¡Byte[] byteArray = System.Text.Encoding.ASCII.GetBytes(postValues);
¡¡¡¡Byte[] pageData = _client.UploadData(Host,"POST",byteArray);
¡¡¡¡ÕâÑù£¬ÎÒÃǾÍÀûÓÃC#½øÐÐÁËÒ»´ÎHTTPµÄPOST·½·¨Ìá½»ÁË¡£
¡¡¡¡DELPHI£º
¡¡¡¡DelphiÀïÎÒÃÇÀûÓÃÒ»¸ö±È½ÏÁ÷ÐеĵÚÈý·½VCL£¬INDY HTTP(Õâ¸ö×é¼þD6£¬D7ÀïÃæ×Ô´ø)½øÐÐHTTPͨÐÅ¡£Ê¹ÓÃÆäµÄPOST·½·¨±ã¿ÉÒÔ½øÐÐHTTPµÄPOSTͨÐÅ£¬ÒòΪ×é¼þ±È½ÏºÃÓã¬ÎҾͲ»ÔÚÆäÃèÊö¾ßÌåµÄ¹ý³ÌÁË¡£´ó¼Ò¿ÉÒԲο¼ÒÔÏ´úÂ룺
¡¡
¡¡function PostWebPage(url,para:String;TimeOut:Integer):String;
Ïà¹ØÎĵµ£º
ÉÏһƪ£¬½éÉÜÁË×é¼þ¿ª·¢µÄÒ»°ã¸ÅÊö£¬ÒÔ¼°×é¼þÀà²ã´Î½á¹¹µÄ¸÷¸öÀàµÄ´óÖÂÐÅÏ¢£¡ÏÖÔھͿªÊ¼Í¨¹ýʵÀý½øÐÐÀ´¼òµ¥µÄ½²ÊöÒ»ÏÂÒ»°ã×é¼þµÄ¿ª·¢¹ý³Ì£¡ÎÒÕâÀïÏȲÉÓÃ×î
»ù±¾µÄ·½Ê½À´´´½¨Ò»¸ö×é¼þ£¡Ò²¾ÍÊÇʹÓÃDelphi×Ô¼ºµÄ×é¼þ¿ª·¢Ïòµ¼À´½¨Á¢Ò»¸öеÄ×é¼þ¡£ÔÚÕâÀÎÒÒÔÀ©³äTEditΪÀý½øÐн²½â¡£
ÄÇôÊ×ÏÈ£¬Òª½éÉܵľÍÊÇ ......
delphi TWebBrowser×é¼þʹÓÃÏê½â
¸Ã×é¼þÊÇÒ»¸öä¯ÀÀÆ÷×é¼þ£¬¿ÉÒÔÏÔʾһ¸öÖ¸¶¨µØÖ·µÄÍøÒ³¡¢ÉèÖÃÍøÒ³´ò¿ªÊ±µÄÖ÷Ò³ÒÔ¼°¶ÔÍøÒ³½øÐÐÏà¹ØµÄ²Ù×÷£¬Í¬Ê±Ò²¿ÉÒÔ¶ÔHTMLÎļþ½øÐмôÇС¢¸´ÖÆ¡¢Õ³Ìù¡¢É¾³ýµÈ²Ù×÷¡£¸Ã
×é¼þÔÚInternet×é¼þÒ³ÖС£
  ......
ÕýÔò±í´ïʽ»ñÈ¡HTML±ê¼ÇÖеÄÄÚÈÝ£¨C#£©
//=====================Begin1========================
//ÊÔÑé×Ö·û´®
string strTmp = string.Empty;
&n ......
Ã÷Ìì¾ÍÊÇÎåÒ»½ÚÁË£¬ÐÁ¿àÁ˺ü¸¸öÔ£¬½è´Ë»ú»áÓ¦¸Ã¾¡Çé·ÅËÉÒ»·¬¡£¿ÉÊÇÏëµ½BlogºÃ¾ÃûÓÐдÎÄÕ£¬ËƺõÈ±Ð©Ê²Ã´ËÆµÄ¡£Õ⼸¸öÔÂÀ´ÔÚÏîÄ¿ÖÐÓÖÔö³¤ÁËÐí¶à¾Ñ飬ѧµ½Ðí¶àʵ¼ÊÓ¦ÓõÄ֪ʶ¡£²»Èç°ÑһЩ±È½ÏÓÐÓõļǼÏÂÀ´£¬¹©ÅóÓÑÃDzο¼¿ÉºÃ¡£
ÎÒÏëµ½DelphiµÄʼþ£¬ÄÇ¿ÉÕæÊǸö·½±ãµÄ¶«Î÷£¬³õѧÕßÔÚ´°ÌåÉÏÀ¼¸¸ö¿ ......
×ªÔØ×Ô£ºhttp://virgos.javaeye.com/blog/611146
Ò»£®Ç°ÑÔ£º
XMLÊÇ΢Èí.NetÕ½ÂÔµÄÒ»¸öÖØÒª×é³É²¿·Ö£¬¶øÇÒËü¿ÉνÊÇXML Web·þÎñµÄ»ùʯ£¬ËùÒÔÕÆÎÕ.Net¿ò¼ÜϵÄXML¼¼Êõ×ÔÈ»ÏԵ÷dz£ÖØÒªÁË¡£±¾ÎĽ«Ö¸µ¼´ó¼ÒÈçºÎÔËÓÃC#ÓïÑÔÍê³É.Net¿ò¼ÜϵÄXMLÎĵµµÄ¶Áд²Ù×÷¡£Ê×ÏÈ£¬ÎÒ»áÏò´ó¼Ò½éÉÜ.Net¿ò¼ÜÖÐÓëXMLÏà¹ØµÄÃüÃû¿Õ¼äºÍÆäÖеÄÖØÒªÀ ......