DELPHIÃæÏò¶ÔÏó²Î¿¼
¡¡¡¡DELPHIÃæÏò¶ÔÏó²Î¿¼
¡¡¡¡³ÂÆæ 2005-07-21
¡¡¡¡Ò»¡¢ÀàºÍ¶ÔÏó
¡¡¡¡ÀàÊǶÔÏóµÄÀàÐÍ£¬ÊÇ´´½¨¶ÔÏóµÄÄ£°å¡£Ò»¸öÀà¿ÉÒÔ´´½¨¶à¸ö¶ÔÏ󣬶øÒ»¸ö¶ÔÏó×ÜÊÇÊôÓÚij¸öÀà¡£Àà¾ßÓÐÄÚ²¿µÄÊôÐÔ£¨×´Ì¬£©ºÍÐÐΪ£¨²Ù×÷£©¡£
¡¡¡¡¶ÔÏóÊÇÀàµÄʵÀý£¬¾ßÓÐÇø±ðÓÚͬÀàÆäËû¶ÔÏóµÄÊôÐÔ¼¯ºÏ¡£
¡¡¡¡¶ÔÏóµÄÉùÃ÷´æ·ÅÓÚ¶ÑÕ»£¬¶ÔÏóµÄÒýÓôæ·ÅÓÚ¶Ñ¡£
¡¡¡¡¶þ¡¢ÀàµÄ·½·¨·ÖÀà
¡¡¡¡1¡¢ ÆÕͨ·½·¨
¡¡¡¡²»¼ÓÈκÎÐÞÊεķ½·¨ÎªÆÕͨ·½·¨¡£ÆÕͨ·½·¨±ØÐëµ÷ÓÃÀàµÄʵÀý½øÐзÃÎÊ¡£¼´±ØÐë
¡¡¡¡½¨ÀàµÄ¶ÔÏ󣬵÷Ó÷½Ê½Îª£º¶ÔÏó.·½·¨£¬ÉùÃ÷·½Ê½Îª£º
¡¡¡¡procedure[function] ·½·¨Ãû(²ÎÊý±í)[:·µ»ØÖµ];
¡¡¡¡2¡¢ ¹¹Ôì·½·¨
¡¡¡¡¹¹Ôì·½·¨ÓÃÓÚ´´½¨ÀàµÄʵÀý£¬µ÷Óú󷵻ØÀàµÄ¾ä±ú¡£¹¹Ôì·½·¨¿ÉÒÔÓжà¸ö°æ±¾¡£ÉùÃ÷·½Ê½ÊÇ£º
¡¡¡¡ constructor ¹¹Ôì·½·¨Ãû(²ÎÊý±í);
¡¡¡¡3¡¢ Îö¹¹·½·¨
¡¡¡¡Îö¹¹·½·¨ÓÃÓÚÏú»ÙÀàµÄʵÀý£¬Ò»°ã²»½¨ÒéÖ±½Óµ÷ÓÃÎö¹¹·½·¨£¬¶ø²ÉÓõ÷ÓöÔÏó.FreeµÄ·½Ê½½øÐжÔÏóÊÍ·Å¡£ÉùÃ÷·½Ê½Îª£º
¡¡¡¡destructor Îö¹¹·½·¨Ãû(²ÎÊý±í);
¡¡¡¡4¡¢ Àà·½·¨
¡¡¡¡Àà·½·¨ÊôÓÚÒ»¸öÀ࣬ÔÚÔËÐÐʱ¼´´æÔÚÓÚÄÚ´æÖС£¿ÉʹÓÃÀà.·½·¨µÄ·½Ê½½øÐе÷Ó㬼´²»ÐèÒª´´½¨ÀàµÄʵÀý¡£ÉùÃ÷·½Ê½ÊÇÔÚÆÕͨ·½·¨Ç°¼Óclass£º
¡¡¡¡class procedure[function] ·½·¨Ãû(²ÎÊý±í)[:·µ»ØÖµ];
¡¡¡¡5¡¢ ÏûÏ¢´¦Àí·½·¨
¡¡¡¡ÏûÏ¢´¦Àí·½·¨ºÍÒ»¸öΨһµÄÏûÏ¢ID½øÐйØÁª£¬ÓÃÓÚÏìÓ¦¶¯Ì¬·ÖÅɵÄÏûÏ¢¡£ÉùÃ÷·½Ê½£º
¡¡¡¡procedure ·½·¨Ãû(ÏûÏ¢±äÔª);message ÏûÏ¢ID;
¡¡¡¡Èý¡¢¶à̬¡¢¼Ì³Ð¡¢ÖØÔØ
¡¡¡¡1¡¢ ¾²Ì¬·½·¨
¡¡¡¡¾²Ì¬·½·¨ÓɶÔÏóµÄÀà¾ö¶¨¡£ÊôÓÚ“ÔçÆÚÁª±à”£¬¼´ÔÚ±àÒë½×¶Î¾Í¾ö¶¨ÁË·½·¨µÄʵÏÖ°æ±¾¡£Ò»¸öÀàµÄʵÀý¿É´´½¨ÎªÆäËûÀàµÄʵÀý£¬µ«Êǵ÷Óõ½Í¬Ãû·½·¨Ê±£¬Ê¹Óõķ½·¨ÊÇÉùÃ÷¸ÃʵÀýµÄÀàµÄ¾²Ì¬·½·¨£¬ÉùÃ÷·½Ê½£º
¡¡¡¡procedure[function] ·½·¨Ãû(²ÎÊý±í)[:·µ»ØÖµ];
¡¡¡¡2¡¢ ÐéÄâ·½·¨
¡¡¡¡ÐéÄâ·½·¨¿ÉʵÏÖ“ºóÆÚÁª±à”£¬¼´ÔÚ³ÌÐòÔËÐÐʱ¿É¶¯Ì¬µ÷Óò»Í¬µÄ·½·¨°æ±¾£¬ÊµÏÖ¶à̬¡£ËùÓÐÀàµÄÐéÄâ·½·¨ÔÚÄÚ´æÖн¨Á¢ÁËÒ»ÕÅVMT£¨ÐéÄâ·½·¨±í£©£¬ÔÚµ÷ÓÃʱ¶¯Ì¬¶¨Î»·½·¨º¯ÊýµÄλÖᣱȶ¯Ì¬·½·¨¶àÕ¼ÓÃÄÚ´æ¿Õ¼ä£¬µ«ÊÇËٶȽϿ졣ÉùÃ÷·½Ê½£º
¡¡¡¡procedure[function] ·½·¨Ãû(²ÎÊý±í)[:·µ»ØÖµ];virtual;
¡¡¡¡3¡¢ ¶¯Ì¬·½·¨
¡¡¡¡ÐéÄâ·½·¨¿ÉʵÏÖ“ºóÆÚÁª±à”£¬¼´ÔÚ³ÌÐòÔËÐÐʱ¿É¶¯Ì¬µ÷Óò»Í¬µÄ·½·¨°æ±¾£¬ÊµÏÖ¶à̬¡£±¾ÀàµÄ¶¯Ì¬·½·¨ÔÚÄÚ´æÖн¨Á¢ÁËÒ»¸öDMT£¨¶¯Ì¬·½·¨±í£©£¬ÔÚµ÷ÓÃʱ¸ù¾Ý¶¯Ì¬·½·¨Î¨Ò»µÄ±àºÅ¶¨Î»·½·¨µØÖ·¡£±ÈÐéÄâ·½·¨ÉÙÕ¼ÓÃÄÚ´æ£
Ïà¹ØÎĵµ£º
Delphi²Ù×÷INIÎļþ²½ÖèÈçÏ£º
-------------------------------------
1£©ÔÚUsesÖÐÌí¼ÓiniFileµ¥Ôª£»
2£©ÉùÃ÷TiniFile¶ÔÏó£»
3£©´´½¨TiniFile¶ÔÏó£»
----------------try------------------
4£©INIÎļþ¶Áд²Ù×÷£»
--------------finally----------------
5£©ÊÍ·ÅTiniFile¶ÔÏó£»
---------------end--------------- ......
Delphi¿½±´Ä¿Â¼(º¬×ÓĿ¼)µÄ·½·¨
ҪʵÏÖĿ¼¼¶µÄ¿½±´£¬¿ÉÒÔÀûÓÃWindows APIº¯ÊýShFileOperation( )£¬Æäº¯ÊýÉùÃ÷ÈçÏ£º
WINSHELLAPI int WINAPI SHFileOperation(
LPSHFILEOPSTRUCT lpFileOp
);
ʵÀý£º
н¨Ò»¸ö¹¤³Ì£¬Æä³ÌÐòʾÀýÈçÏ£º
unit Unit1;
interface
uses
Windows, Messag ......
ÓÉÓÚ×é¼þÌṩµÄ·½Ê½²»Í¬£¬ËùÒÔ°²×°µÄ·½·¨Ò²ÊDz»Ò»ÑùµÄ£¬ÏÂÃæ¾ÍĿǰ³£¼ûµÄ¸÷ÖÖÐÎʽµÄ×é¼þµÄ°²×°·½·¨½éÉÜһϡ£
1 Ö»ÓÐÒ»¸öDCUÎļþµÄ×é¼þ¡£DCUÎļþÊDZàÒëºÃµÄµ¥ÔªÎļþ£¬ÕâÑùµÄ×é¼þÊÇ×÷Õß²»Ïë°ÑÔ´Â빫²¼¡£Ò»°ãÀ´Ëµ£¬×÷Õß±ØÐë˵Ã÷´Ë×é¼þÊʺÏDelphiµÄÄÄÖÖ°æ±¾£¬Èç¹û°æ±¾²»¶ ......
Client:TSocketConnection ºÍServer: Scktsrvr¹ØÏµ----ѹËõÊý¾Ý´«Êä
Ò»Ö±ÓÃSocketConnectionºÍ·þÎñ¶ËµÄ´«ÊäÊý¾ÝÔÚÈý²ãÊý¾Ý¿âÖУ¬´ÓÀ´Ã»ÓÐ×¢Òâµ½ËüÃÇÖ®¼äµÄÊý¾Ý´«Ê䣬ֻÊÇÏë×Å£¬¹ÜËüÁË£¬ÍøÂçµÄÊ£¬Ç°¶Îʱ¼äÔÚDelphiÖеÄDemosÖз¢ÏÖDemos\Midas\Intrcpt.dprÀý×Ó£¬ºÇºÇ£¬ÔÙ¿´Á˰ëÌìµÄVCL·¢ÏÖ¿ÉÒÔ½«Client¶Ë·¢Ë͵ĸøServerµÄÊ ......
DelphiÖÐÓÐÒ»¸öÏß³ÌÀàTThreadÊÇÓÃÀ´ÊµÏÖ¶àÏ̱߳à³ÌµÄ£¬Õâ¸ö¾ø´ó¶àÊýDelphiÊé½å¶¼ÓÐ˵µ½£¬µ«»ù±¾É϶¼ÊǶÔTThreadÀàµÄ¼¸¸ö³ÉÔ±×÷Ò»¼òµ¥½éÉÜ£¬ÔÙ˵Ã÷Ò»ÏÂExecuteµÄʵÏÖºÍSynchronizeµÄÓ÷¨¾ÍÍêÁË¡£È»¶øÕâ²¢²»ÊǶàÏ̱߳à³ÌµÄÈ«²¿£¬ÎÒд´ËÎĵÄÄ¿µÄÔÚÓÚ¶Ô´Ë×÷Ò»¸ö²¹³ä¡£
Ï̱߳¾ÖÊÉÏÊǽø³ÌÖÐÒ»¶Î²¢·¢ÔËÐеĴú ......