ÎʸödelphiµÄÎÊÌâ(ÐÂÊÖÇóÖú)
¸÷λ¸ßÈ˰ï°ï棬×òÌìÎÊÁËͬÑùµÄÎÊÌ⣬µ«ÊǽñÌìÓб仯£¬¾ÍÊÇdelphi2010 н¨Ò»¸öµ¥ÔªÎļþ£¬ÈçºÎÓÃÀ´´æ·ÅÆäËû´°ÌåµÄ×é¼þµÄcaptionÖ®ÀàµÄ£¿
ÀýÈ磺һ¸ödelphi¹¤³ÌÓÐ5¸ö´°ÌåÎļþ£¬5¸ö´°ÌåÎļþ¶¼ÓÐlabel×é¼þ£¬ÏÖÔÚÐèҪн¨Ò»¸öµ¥ÔªÎļþ£¬½«ÄÇ5¸ö´°ÌåµÄËùÓÐlable×é¼þµÄcaption¶¼·ÅÔÚÕâ¸öµ¥ÔªÎļþÖУ¬ÔËÐй¤³Ìºó£¬ÄÇ5¸ö´°ÌåÎļþµÄlable.caption×Ô¶¯Ìî³ä£¡Õâ¸öн¨µÄµ¥ÔªÎļþÒªÇóÊÇÒªÄÜÈ«Çò»¯£¬µ«ÊÇÏÖÔÚÖ»ÒªÄÜÓÐÖÐÎľͺÃÁË¡£ºÃÏñÊÇÀàËÆÕâÑùд£º CM_ACTIVATE = CM_BASE + 0;
CM_DEACTIVATE = CM_BASE + 1;
CM_GOTFOCUS = CM_BASE + 2;
µ½µ×ÊÇÔõôŪŶ£¬¸÷λ°ï°ï棡
²»ÊǺÜÃ÷°×¡¢¡¢¡¢¡¢¡¢
ÔÚµ¥ÔªµÄ½Ó¿Ú²¿·Ö×öÈ«¾Ö±äÁ¿¾Í¿ÉÒÔ°¡
unit Unit2;
interface
var
Cap1 : string = 'µÚÒ»¸öCaption';
implementation
end.
//////////////////////////
Unit1µÄimplementation²¿·Ö:
implementation
uses Unit2;
Ïà¹ØÎÊ´ð£º
Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿
ÎÞÈ˻شð£¿
×ö³É×ÊÔ´Î ......
xml := CreateOleObject('Microsoft.XMLHTTP');
xml.Open('GET','http://www.google.com', False);
xml.Send;
xml.responseText;
ʹÓÃxml.responseText¿ÉÒÔ»ñÈ¡ÍøÒ³Ô´Âë,µ«ÊÇÔÙ´Î ......
¸÷λ´óÀÐ:
СµÜ±àдÁËһЩ³¬ÊÐǰ̨ÊÕÒø³ÌÐò(Óô¥ÃþÆÁ),µ«ÔÚ³ÌÐò½øÈëǰ,ÐèÒª²Ù×÷SQLÊý¾ÝÊýµÇ¼¿ò,ÎÒÏëÓÃXPµÄÆÁÄ»¼üÅÌÊäÈë,µ«ÊÇÖ»ÒªÆÁÄ»¼üÅÌ´ò¿ª,³ÌÐò×ÜÊDZ¨¶Ë¿Ú´«Êä³ö´íÐÅÏ¢(´ËÐÅÏ¢ÊÇÎҵijÌÐòÖÐÉèÖõÄ,ÊÇÏò¹Ë¿ÍÏÔÊ¾Æ ......
ÈçÌâËùʾ
СµÜʹÓÃDelphi7»·¾³½øÐÐÊý¾Ý²É¼¯£¬²É¼¯µ½µÄÊý¾Ý·ÅÈëSQL Server2000Êý¾Ý¿âÖУ¬µ«ÊÇÏë²»°²×°SQLServer2000À´ÊµÏÖ´ÓÆäËü¼ÆËã»úÉÏÔËÐд˳ÌÐò£¬²»ÖªÈçºÎʵÏÖ£¿Íû¸÷λ´óϺ¸æÖªÒ»¶þ¡£
ÁíÍ⣬ÏÖÔÚСµÜÓöµ½ÁËÒ»¸ö ......