Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

DelphiÈÕÆÚº¯Êý

ËùÔÚµ¥Ôª£º DateUtils
Day ¿ªÍ·µÄº¯Êý
1¡¢DayOf()
ÃèÊö£º ʹÓà DateOf º¯ÊýÓÃÀ´°ÑÒ»¸ö TDateTime ÀàÐ͵ıäÁ¿×ª±ä³ÉÒ»¸ö Ö»´øÓÐÈÕÆÚµÄ TDateTime ÀàÐͱäÁ¿¡£ ÀýÈ磺 showmessage(DateTimetostr(dateof(now()))); ÄãµÃµ½µÄÊÇ 2003/03/19 ¶ø showmessage(DateTimetostr((now()))); µÃµ½µÄÊÇ
2¡¢DateTimeTostr()
ÃèÊö£º DateTimeToString º¯Êý½« TDateTime ÀàÐ͵IJÎÊý DateTime ת»»³ÉÒ»¸ö ×Ö·û´®£¬Ê¹Óøø¶¨µÄÈ«¾Ö±äÁ¿ ShortDateFormat µÄ¸ñʽ£¬Ê±¼ä²¿·Ö°´ÕÕ ¸ø¶¨µÄÈ«¾Ö±äÁ¿ LongTimeFormat µÄ¸ñʽ¡£ ÆäÖÐ DateTime ΪÁãµÄ²¿·Ö½«²»»áÏÔʾ³öÀ´¡£ ÀýÈ磺 ShortDateFormat:=’yyyy mm dd’; showmessage(DateTimetostr((now()))); Ä㽫µÃµ½£º2003
3¡¢DateTimeToString
ÃèÊö£º DateTimeToString ·½·¨½«TDateTimeÀàÐ͵IJÎÊýDateTime °´ÕÕÓɲÎÊýFormatÌṩµÄ¸ñʽ ת»¯³É×Ö·û´®£¬²¢±£´æÔÚResultÖС£ ¶ÔÓÚFormatµÄ¸ñʽÀàÐÍ£¬Çë¿´ Date-Time format strings µÄ°ïÖú¡£ ÀýÈ磺 DateTimeToString(result,’yyyy mm dd’,now()); ÄÇô resultµÄ½á¹ûΪ£º2003
4¡¢DateTimeToSystemTime ()
ÃèÊö£º ÓÐʱΪÁ˵÷ÓÃAPIº¯ÊýÀ´Ê¹ÓÃϵͳʱ¼ä£¬Äã¿ÉÒÔʹÓà DateTimeToSystemTime ·½·¨£¬À´½«Ò»¸ö TDateTime ÀàÐ͵Äʱ¼ä±äÁ¿×ª»»³ÉÒ»¸ö TSystemTime ÀàÐÍµÄ ÏµÍ³Ê±¼ä¡£
5¡¢DateTimeToUnix ()
ÃèÊö£º ʹÓà DateTimeToUnix º¯ÊýÀ´½«Ò»¸ö TDateTime ÐÍʱ¼ä±äÁ¿×ª»»³ÉÒ»¸öÏàÓ¦µÄ Unix ¸ñʽ µÄÈÕÆÚºÍʱ¼ä¡£
6¡¢DateToStr£¨£©
ÃèÊö£º ʹÓà DateToStr º¯ÊýÄܵõ½ TDateTime ÈÕÆÚʱ¼äÀàÐ͵ÄÈÕÆÚ²¿·Ö¡£ÈÕÆÚµÄת»»¸ñʽÒÀÀµÓÚ È«¾Ö±äÁ¿ ShortDateFormat¡£
7¡¢DayOf ÓëDayOfTheMonth
ÃèÊö£º ¶ÔÓÚ¸ø¶¨µÄTDateTimeÀàÐ͵ÄÈÕÆÚʱ¼ä£¬Ê¹Óà DayOf º¯ÊýÄܵõ½¸ÃÈÕÆÚÊǸÃÔ·ݵĵڼ¸Ìì¡£ ¸Ãº¯ÊýµÄ·µ»ØÊýÖµÔÚ 1 µ½ 31 Ö®¼ä ×¢Ò⣺DayOf º¯ÊýµÃµ½µÄ½á¹ûÓë DayOfTheMonth Ïàͬ¡£ ÀýÈ磺 showmessage(inttostr(dayof(now))); µÃµ½µÄÊÇ£º19 £¨½ñÌìÊÇ Ä³ÔÂ19ÈÕ£© Óë DayOf Ïàͬ¡£
8¡¢DayOfTheWeek
ÃèÊö£º ¶ÔÓÚ¸ø¶¨µÄTDateTimeÀàÐ͵ÄÈÕÆÚʱ¼ä£¬Ê¹Óà DayOfTheWeek º¯ÊýÄܵõ½¸ÃÈÕÆÚÊǸÃÐÇÆÚµÄ µÚ¼¸Ìì¡£DayOfTheWeek º¯ÊýµÄ·µ»ØÊýֵΪ 1 µ½ 7£¬ÆäÖÐ 1 ±íʾÐÇÆÚÒ»£¬¶ø 7 ±íʾÐÇÆÚÈÕ¡£ ×¢Ò⣺DayOfTheWeek ÊÇ ISO 8601 ±ê×¼µÄ£¨´Ë±ê׼Ϊ ÐÇÆÚÒ»ÊÇÒ»ÖܵĵÚÒ»Ì죩¡£¶ÔÓÚÒ»ÖÜ µÄµÚÒ»ÌìÊÇÐÇÆÚÈյıê×¼£¬Èç¹ûÏë»ñµÃÐÇÆÚÊý£¬ÇëʹÓà DayOfWeek º¯Êý¡£
9¡¢DayOfTheYear
ÃèÊö£º ¸ù¾Ý¸ø¶¨µÄ


Ïà¹ØÎĵµ£º

Delphiº¯ÊýºÍ¹ý³Ì

     ¹ý³ÌÎÞ·µ»ØÖµ£¬º¯ÊýÓзµ»ØÖµ¡£
     procedure MyProc(m,n : Integer; o : String; p : Single = 2.5; q : String = 'Delphi');
     ÈçÉÏÀýËùʾ£¬¹ý³ÌÉùÃ÷ºÍ¶¨ÒåÖУ¬¶à¸ö²ÎÊýÊÇÓ÷ֺŸô¿ªµÄ£¬µ«ÔÚµ÷ÓÃʱÊÇÓöººÅ¸ô¿ªµÄ ¡£eg£º
  ......

ÓÃDelphi¿ª·¢Êý¾Ý¿âÓ¦ÓóÌÐòµÄ³£Ó÷½Ê½

ÓÃDelphi¿ª·¢Êý¾Ý¿âÓ¦Óã¬Ò»°ã»áÉæ¼°µ½ÉÁÆÁ£¨Splash£©¡¢µÇ¼´°¿Ú¡¢Ö÷Êý¾ÝÄ£¿é£¨»òÖ÷Êý¾Ý¿âÁ¬½Ó£©ÒÔ¼°Ö÷´°¿Ú¡£Í¨³£ÔÚÏîÄ¿ÎļþÖУ¬splash´°¿ÚÏÔʾ¹ý£¬Ò»Ð©ÐèÒª¼ÓÔØµÄ×ÊÔ´¡¢´°¿Ú¼ÓÔØ¹ýºó£¬Application.Run֮ǰ£¬½øÐÐÓû§µÇ¼¡£
//²âÊÔCSDN²©¿Í¶ÔDELPHI´úÂëµÄÖ§³Ö
program TEST;
uses
Forms,
Windows,
MainF in 'Ma ......

delphi×¢²á±í²Ù×÷ÍêÈ«ÊÖ²á

32λDelphi³ÌÐòÖпÉÀûÓÃTRegistry¶ÔÏóÀ´´æÈ¡×¢²á±íÎļþÖеÄÐÅÏ¢¡£
¡¡¡¡Ò»¡¢´´½¨ºÍÊÍ·ÅTRegistry¶ÔÏó
¡¡¡¡1.´´½¨TRegistry¶ÔÏó¡£ÎªÁ˲Ù×÷×¢²á±í£¬Òª´´½¨Ò»¸öTRegistry¶ÔÏó£ºARegistry := TRegistry.Create£»
¡¡¡¡2.ÊÍ·ÅTRegistry¶ÔÏó¡£¶Ô×¢²á±í²Ù×÷½áÊøºó£¬Ó¦ÊÍ·ÅTRegistry¶ÔÏóËùÕ¼Äڴ棺ARegistry.Destroy¡£
¡¡¡¡¶þ ......

DelphiµÄ5ÖÖ·½·¨ÀàÐÍ

DelphiµÄ·½·¨ÀàÐÍÓУº
1.¾²Ì¬·½·¨ (Static) ĬÈÏÀàÐÍ£¬¿ÉÒÔÊ¡ÂԹؼü×Ö
2.ÐéÄâ·½·¨ (Virtual)
3.¶¯Ì¬·½·¨ (Dynamic)
4.ÏûÏ¢·½·¨ (Message)
5.³éÏó·¨·½ (Abstract)
=======================================================
1£©¾²Ì¬·½·¨[static]
¾²Ì¬·½·¨ÀàËÆÓÚͨ³£µÄ¹ý³ÌºÍº¯Êý£¬±àÒëÆ÷ÔÚ±àÒëʱ¾ÍÒÑÖ¸¶¨ÁËÊä³ö¸Ã·½· ......

javascriptÖе÷ÓÃdelphiº¯Êý


ÒÔÏÂÊÇtest.htmÒ³µÄÄÚÈÝ
Ê×Ïȶ¨ÒåÒ»¸ö²å¼þ¶ÔÏó
 
<object id="Mapupload" name="Mapupload" width="0" height="0" classid="clsid:045FA9B9-B373-4D4C-AE76-128A19A4B6AE">
</object>
<script type="text/javascript">
//´Ëº¯Êý´ò¿ªactivexform´°Ì岢Ϊactiv ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ