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

delphiÖÐmoveº¯ÊýµÄÓ÷¨

ÎÒÃÇÄÜ¿´µ½ÒÔÏ´úÂë
var pSource,pDest:PChar;
     len: integer;
.......................//һЩ´úÂë
Move(pSource,pDest,len); //´íÎó
Move(pSource^,pDest^,len); //ÕýÈ·
¿´ÆðÀ´È·ÊµºÃÏñÊÇ´«Öµ£¬¶ø²»ÊÇ´«µØÖ·£¬µ«ÊǸ÷λ±ðÍüÁË£¬Õâ²»ÊÇC£¬C++£¬¶øÊÇDelphi
Object Pascal,ËùÒÔ£¬¾ø²»ÄÜ´Óº¯Êýµ÷Óõķ½·¨ÅжÏÊÇ´«Öµ»¹ÊÇ´®µØÖ·£¡£¡±ØÐë¿´º¯ÊýµÄ
¶¨Ò壬ֻÓж¨Òå²ÅÄÜ˵Ã÷ÊÇ´«Öµ»¹ÊÇ´«µØÖ·£¬ÔÙ˵һ±é£¬Õâ²»ÊÇC£¬C++£¡£¡
ÎÒÃÇ¿´µ½µÄº¯Êý¶¨ÒåÊÇÕâÑùµÄ
procedure Move(const Source; var Dest; Count: Integer);
´Ó¶¨ÒåÉÏ¿´£¬ºÜÇå³þ£¬DestÊÇ´«µØÖ·£¬¶ø²»ÊÇ´«Öµ£¬ÄÇôSourceÄØ£¬Æäʵ´ó¼Ò²»Ì«Çå³þ
ÕâÀïµÄConstÐÞÊηûÓÐÁ½¸öº¬Ò壬µÚÒ»¸ö´ó¼Ò¶¼ÖªµÀ¾ÍÊÇSourceÒ»³£Á¿·½Ê½ÔÚº¯ÊýÌåÄÚ£¬
²»¿ÉÒԸıäËüµÄÖµ£¬µÚ¶þ¸ö¿ÉÄÜÖªµÀµÄÈ˲»¶à£¬ÄǾÍÊÇSourceµÄ´«µÝ·½Ê½ºÍDestÒ»Ñù£¬
ÊÇ´«µØÖ·£¡Ò²¾ÍÊÇ˵constºÍvarÒ»Ñù£¬¶¼ÊÇ´«µØÖ·£¬Ö»²»¹ýÒ»¸öÔÚº¯ÊýÄÚ²»ÔÊÐíÐ޸ģ¬
ÁíÒ»¸öÊÇÐ޸ĺóÓ°Ïìµ÷ÓõıäÁ¿Öµ
ËùÒÔMoveÊÇ´«µØÖ·£¬¶øÇ¡Ç¡²»ÊÇ´«Öµ£¡
Move(const   Source;   var   Dest;   Count:   Integer);  
  Source   and   Dest¶¼ÊÇÖ¸ÏòÒ»¸öÊ×µØÖ·£¬  
  Èç  
  var                                                                 Ê×µØÖ·  
      P:   Pointer;                                                P^  
      P:   PChar            &


Ïà¹ØÎĵµ£º

Delphi ÖÐµÄ Var buffer ¿ªÀàÐͲÎÊý

ÒÔÏÂÊÇÔÚÍøÉÏÊÕ¼¯µÄһЩ¶ÔÎÞÀàÐͲÎÊýµÄ˵Ã÷.¸öÈËÀí½âÎÞÀàÐͱäÁ¿¾ÍÊÇÒ»¸öÖ¸Õë.
ÏóDelphiÖÐfunction   Read(var   Buffer;   Count:   Longint):   Longint;   override;ÏóBufferÕâÑùûÓÐÀàÐ͵IJÎÊý¾¿¾¹Ó¦¸ÃÔõô¸ø²ÎÊý£¿£¿£¿£¿  
  Õâ˵Ã÷BufferÊÇͨ¹ýµØÖ··½Ê½´«µÝµÄ£¬Ò»°ã˵À´Ö» ......

delphiÈÕÆÚº¯Êý


  
Day ¿ªÍ·µÄº¯Êý
¡ñ
Unit
DateUtils
function DateOf(const Avalue: TDateTime): TDateTime;
ÃèÊö
ʹÓà DateOf º¯ÊýÓÃÀ´°ÑÒ»¸ö TDateTime ÀàÐ͵ıäÁ¿×ª±ä³ÉÒ»¸ö
Ö»´øÓÐÈÕÆÚµÄ TDateTime ÀàÐͱäÁ¿¡£
ÀýÈ磺
showmessage(DateTimetostr(dateof(now())));
ÄãµÃµ½µÄÊÇ 2003/03/19
¶ø showmessage(Dat ......

DelphiÔÚVasta/win 7Ï»ñȡȨÏÞ

±Ï¾¹Win32³ÌÐòµÄ¿ª·¢£¬Delphi»¹ÊÇÓÐÍçÇ¿µÄÉúÃüÁ¦µÄ¡£
²Ù×÷²½ÖèÈçÏ£º
1.½¨Á¢ res Îļþ
½¨Á¢Ò»¸öÎı¾Îļþ£¬Ãû×Ö¿ÉÒÔ×Ô¼ºÆð£¬ÎÒÕâÀï½Ð£ºUAC.manifest£¬ÄÚÈÝ£º
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
......

DELPHIÓû§µÇ¼·½°¸

3.2  Óû§µÇ¼·½°¸
ÔÚ½øÈëÒ»¸öϵͳʱ£¬±ØÐëÏÈÔڵǼ´°ÌåÖÐÊäÈëÕýÈ·µÄÓû§ÃûºÍÃÜÂë²ÅÄܽøÈë¡£ÕâÑù¿ÉÒÔÈ·±£ÏµÍ³µÄ°²È«ÐԺͱ£ÃÜÐÔ£¬µÇ¼´°ÌåµÄÖÆ×÷°´ÕÕϵͳµÄ´óС¼°Óô¦£¬¿ÉÒÔ·ÖΪ²»Í¬µÄµÇ¼´°ÌåÑùʽ£¬ÔÚϵͳµÚÒ»´ÎµÇ¼ǰ£¬Ê×ÏÈÒª¶Ô²Ù×÷Ô±ÐÅÏ¢½øÐÐÏàÓ¦µÄÉèÖᣱ¾½Ú½«¶ÔµÇ¼´°Ìå¼°²Ù×÷Ô±¹ÜÀí´°ÌåµÄÖÆ×÷¹ý³Ì½øÐÐÏêϸµÄ˵Ã÷ ......

WIN32ÏÂDELPHIÖеĶàÏ̡߳¾ÉîÈëVCLÔ´Âë¡¿£¨Ò»£©

Ï̵߳Ļù´¡ÖªÊ¶
      Ï̵߳Ä×é³É¡£Ïß³ÌÓÐÁ½²¿·Ö×é³É¡£
     1¡¢Ò»¸öÊÇÏ̵߳ÄÄں˶ÔÏ󣬲Ù×÷ϵͳÓÃËüÀ´¶ÔÏß³Ìʵʩ¹ÜÀí¡£Äں˶ÔÏóÒ²ÊÇϵͳÓÃÀ´´æ·ÅÏß³Ìͳ¼ÆÐÅÏ¢µÄµØ·½¡£
     2¡¢ÁíÒ»¸öÊÇÏ̶߳ÑÕ»£¬ËüÓÃÓÚά»¤Ïß³ÌÔÚÖ´ÐдúÂëʱÐèÒªµÄËùÓк¯Êý²ÎÊýºÍ¾Ö² ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ