DelphiʵÏÖµÄMIMEÓʼþ¸ñʽ½âÎöÀà¿â
Ñо¿ÁËÒ»ÏÂPop3µÄÓʼþ½ÓÊÕÐÒ飬ȻºóËæÊÖдÁËÒ»¸öPop3µÄÓʼþ½ÓÊտؼþ£¡Pop3µÄÓʼþÐÒéʵ¼ÊÉÏÊǺܼòµ¥µÄ£¬ÖªµÀÄǼ¸¸öÃüÁî¾ÍÐÐÁË£¬Óë·þÎñÆ÷Ö®¼ä
µÄ½»»¥ÊÇÒ»ÎÊÒ»´ðµÃ·½Ê½£¬¿ØÖÆÆðÀ´Ò²ÈÝÒ×£¬Ïà¶Ô¶øÑÔÓʼþ¸ñʽµÄ½âÎöµ¹ÊǸü¼ÓÂé·³Ò»µã£¡ÓÚÊÇÒ²±ã˳´ø×Ž«MIMEÓʼþ¸ñʽ¸øÊìϤÁËһϣ¡×ܹé˵À´£¬¹æÂÉÐÔ±È
½ÏÇ¿£¬ÏÈ»ñÈ¡×î´óµÄ¶¥²ã¿ò¼Ü£¬È»ºó¸ù¾Ý¶¥²ã¿ò¼ÜÀ´ÅжÏÊÇ·ñÓл¹ÓÐ×Ó¿ò¼Ü£¬ÒÀ´Î¸ù¾Ý¸ø¶¨µÄ¼ä¸ô·ûºÅµü´úÏÂÀ´£¡¿´¿´ÀàÉè¼Æ£¡Ê×ÏÈÒ»¸öMIMEÊÇÒªÓÐÒ»¸öÓʼþ
Í·£¡ËùÒÔÕâ¸öÀàÊDZØÈ»µÄ£¡
ʵÏÖÁËÓʼþÍ·ÀàTDxMIMEHeader
£¬È»ºóÔÙ¿´Óʼþ¸ñʽ£¬¾ÍÊÇÊý¾Ý²¿·ÖÁË£¬Êý¾Ý²¿·Ö¾ÍÉæ¼°µ½Ç°ÃæËµµÄ¿ò¼ÜÎÊÌ⣬ÓÐMulpart/mixedµÈÕâÑùµÄ»¹ÓÐ×Ó¿ò¼ÜµÄ½á¹¹£¬Ò²Óе¥´¿µÄtext
/plainÕâÑùµÄ´¿Îı¾½á¹¹£¬¾ßÌåµÄÐÅÏ¢¶¼ÔÚÓʼþ¸ñʽµÄÍ·²¿ÓÐ˵Ã÷
£¬ÓÚÊǽ«Êý¾ÝPartÉè¼Æ³ÉÁËÒ»¸ö¼Ì³Ðģʽ£¬TDxMIMEPart×÷ΪÊý¾ÝPartµÄ»ùÀ࣬ȻºóMulpart/mixed£¬text/plainµÈÕâ
ÑùµÄ¸÷¸öÄ£¿é²¿·Ö¶¼´Ó¸ÃÀà¼Ì³Ð£¬Mulpart/mixedµÈÊÇÓÐÄÚ²¿Êý¾ÝÄ£¿éµÄ£¬ËùÒÔÕâ¸öÁíÍâ¼Ì³ÐÒ»¸ö¶àÊý¾ÝÄ£¿é»ùÀàTDxMimeMulPart£¬È»
ºóÖ»Òªº¬Óжà¸öÊý¾ÝÄ£¿éµÄÄ£¿é¶¼´ÓÕâ¸öÀà¼Ì³ÐȥʵÏÖ£¬³ý´ËÖ®Í⣬»¹ÐèÒªÒ»¸ö¸½¼þµÈÁ÷ʽÊý¾ÝµÄÁ÷Ä£¿éµÄ½âÎöÀàTDxMIMEStreamPart£¬±¾ÀàÖ÷Òª
Êǽ«¸½¼þµÈÐÅÏ¢»¹Ô³öÀ´£¡´óÖÂÐÅÏ¢Èç´Ë£¬ÆäʵӦ¸Ã¸øÄ£¿éÀ໹ҪÉèÖÃÒ»¸öÄ£¿éÍ·µÄÀàµÄ£¬ÒòΪֻÊÇÑо¿Ò²¾ÍÖ±½ÓдÔÚÀïÃæÁË£¡´óÖ´úÂë¿éÈçÏ£º
´úÂë
(*
****************************************************
*)
(*
µÃÏй¤×÷ÊÒ
*)
(*
Óʼþ¸ñʽ½âÎöµ¥Ôª
*)
(*
&nbs
Ïà¹ØÎĵµ£º
(Ò») ʹÓö¯Ì¬´´½¨µÄ·½·¨
Ê×ÏÈ´´½¨ Excel ¶ÔÏó£¬Ê¹ÓÃComObj:
var ExcelApp: Variant;
ExcelApp := CreateOleObject( 'Excel.Application' );
1) ÏÔʾµ±Ç°´°¿Ú£º
ExcelApp.Visible := True;
2) ¸ü¸Ä Excel ±êÌâÀ¸£º
ExcelApp.Caption := 'Ó¦ÓóÌÐòµ÷Óà Microsoft Excel';
3) Ìí¼Óй¤×÷²¾£º
ExcelApp.WorkBooks.Add ......
¶Á“Delphi2010,DELPHIµÄÏ£Íû?”ÓиÐ
ÔÎÄ£ºhttp://www.gowjq.com/forum-29-1.html
1£© Ê¢´óµÄÖ÷Òª¿ª·¢¹¤¾ßÊÇDelphi, Ïê¼û£º http://act.sdo.com/Delphi/£¬ ÓÎÏ·ÊÇÒ»ÖÖ¸´ÔÓ½»»¥½çÃæµÄ¿ª·¢£¬Delphi¿ÉÒÔʤÈΡ£Í¬Ñù×÷ΪÆóÒµÓ¦ÓõÄǰ¶Ë£¬ÓÃDELPHI¿ª·¢Ò²ÊǺܺõÄÑ¡Ôñ¡£
2£© Ò ......
Ò»¡¢DelphiÖÐÁ÷µÄ»ù±¾¸ÅÄî¼°º¯ÊýÉùÃ÷
ÔÚDelphiÖУ¬ËùÓÐÁ÷¶ÔÏóµÄ»ùÀàΪTStreamÀ࣬ÆäÖж¨ÒåÁËËùÓÐÁ÷µÄ¹²Í¬ÊôÐԺͷ½·¨¡£
TStreamÀàÖж¨ÒåµÄÊôÐÔ½éÉÜÈçÏ£º
1¡¢Size:´ËÊôÐÔÒÔ×Ö½Ú·µ»ØÁ÷ÖÐÊý¾Ý´óС¡£
2¡¢Position:´ËÊôÐÔ¿ØÖÆÁ÷ÖдæÈ¡Ö¸ÕëµÄλÖà ......
ÓÉÓÚÏîÄ¿µÄÐèÒª£¬½üÆÚ¿ªÊ¼Ñ§Ï°ÓÃdelphi¿ª·¢Ò»¸öÈíµç»°¿Ø¼þ¡£
ÒÔǰ½Ó´¥¹ýһЩdelphi¿ª·¢·½ÃæµÄ¶«Î÷£¨µ±È»¶¼ÊÇЩƤëÀ²£©£¬µ«Ã»½Ó´¥¹ýocx¿Ø¼þµÄ¿ª·¢£¬Ôڴ˰ÑһЩ¼òµ¥µÄ¶«Î÷¼ÇÏÂÀ´£¬Ò»·½ÃæÒÔºó×Ô¼º¿ÉÒÔÔÙѧϰ£¬ÁíÒ»·½ÃæÏ£Íû¶Ô¸Õ¸Õѧϰdelphi¿ª·¢ocx¿Ø¼þµÄ³õѧ ......
Delphi×Ö·û´®º¯Êý´óÈ«
uses StrUtils;
¡¾×Ö·û´®º¯Êý´óÈ«¡¿
Êײ¿ function AnsiResemblesText(const AText, AOther: string): Boolean;
$[StrUtils.pas
¹¦ÄÜ ·µ»ØÁ½¸ö×Ö·û´®ÊÇ·ñÏàËÆ
  ......