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

delphiÖ¸Õë¼òµ¥ÈëÃÅ:


    
 Ö¸ÕëÓ÷¨µÄÀý×Ó£º  
  1         var  
  2             X,   Y:   Integer;       //   X   and   Y   ÕûÊýÀàÐÍ  
  3             P:   ^Integer;           //   P   Ö¸ÏòÕûÊýÀàÐ͵ÄÖ¸Õë  
  4         begin  
  5             X   :=17; //   ¸ø   X   ¸³Öµ  
  6             P   :=   @X;                   //   °Ñ   xµÄµØÖ·¸³¸øp  
  7             Y   :=   P^;                   //   È¡³öpËùÖ¸ÏòµÄÊýÖµ¸³¸øy  
  8         end;  
   
  µÚ¶þÐж¨ÒåÁËÁ½¸ö±äÁ¿X,y.   µÚÈýÐÐÉùÃ÷ÁËpÊÇÖ¸ÏòÕûÊýÀàÐ͵ÄÖ¸Õë;Òâζ×ÅpÄܹ»Ö¸Ïòx»òÕßyµÄµØÖ·.µÚÎåÐи³¸øxÖµ,µÚÁùÐаÑxµÄµØÖ·¸³¸øp.×î  
   
  ºóͨ¹ýpÖ¸ÏòµÄ±äÁ¿¸³Öµ¸øy.´Ëʱ,xºÍyÓÐÏàͬµÄÖµ.  
   
  ²Ù×÷·û@ÓÃÀ´È¡³ö±äÁ¿µÄµØÖ·,Ò²¿ÉÒÔÈ¡³ö¹ý³ÌºÍº¯ÊýµÄµØÖ·.  
   
  ¶ø·ûºÅ^ÓÐÁ½¸öÄ¿±ê,  
  µ±Ëü³öÏÖÔÚÀàÐͶ¨ÒåµÄÇ°ÃæʱÈç ^typename ±íʾָÏòÕâÖÖÀàÐ͵ÄÖ¸Õë;  
  µ±Ëü³öÏÖÔÚÖ¸Õë±äÁ¿ºó±ßʱ   Èç point^ ·µ»ØÖ¸ÕëÖ¸ÏòµÄ±äÁ¿µÄÖµ;  
   
  Àí½âÖ¸Õë±È½ÏÈÝÒ×Àí½âÃæÏò¶ÔÏóµÄpascalÓïÑÔ,ÒòΪָÕë¾­³£ÔÚÄ»ºó²Ù×÷.ÈκÎÒªÇó¶¯Ì¬·ÖÅä´óµÄÄÚ´æ¿Õ¼äµÄÀàÐÍ¿ÉÒÔÓÃÖ¸ÕëÀàÐÍ.ÀýÈç  
   
  ,long-string±äÁ¿,ʵ¼ÊÔÚʹÓÃÖ¸Õë½øÐвÙ×÷.ÁíÍâһЩ¸ß¼¶µÄ±à³Ì¼¼ÊõÐèҪʹÓÃÖ¸ÕëÀàÐÍ.  
  ÓÐʱָÕëÊÇÊÊÓ¦object   pascalÑϸñµÄÀàÐÍÏÞÖƵÄΨһ·½·¨.ͬ¹ýÒ»¸öͨÓõÄÖ¸ÕëÀàÐÍ,ͨ¹ýÀàÐÍת»»³É²»Í¬µÄÖ¸ÕëÀàÐÍ,ÈçÏÂÃæµÄÀý×Ó:  
  type  
   
      PInteger


Ïà¹ØÎĵµ£º

Delphi Ñ­»·µÄÃØÃÜ

¼¼Êõ½»Á÷,DH½²½â. ¹þ¹þ,ÎÒ³ÐÈÏÎÒÊDZêÌâµ³.
×î½ü¿´ÌìÊéÒ¹¶ÁÀïÃæÊǶÔCÓïÑԵĴúÂë·´»ã±à,²»´í,¿ÉϧDelphiûÓÐÕâÑùµÄÊé,ÄÇÎÒÃÇ×Ô¼º¶¯ÊÖ°É.
Ê×ÏȽøÈëForÑ­»·ÁË. Function TestFor( a, b: Integer ): Integer ;
Var
I: Integer ;
Begin
Result := a + b ;
For I := 0 To 49 Do
Result := Result + I ......

Delphi CRC32УÑé

ÍøÉÏDownµÄÒ»¸öµ¥Ôª.×Ô¼º¸ÄÁËÏÂ. unit utCRC32;
interface
uses
Windows,SysUtils,Classes;
const //Crc32±í
Crc32Tab: Array[0..$FF] of LongInt =
($00000000, $77073096, $ee0e612c, $990951ba, $076dc419, $706af48f,
$e963a535, $9e6495a3, $0edb8832, $79dcb8a4, $e0d5e91e, $97d2d988,
$0 ......

ÒýÓà [ת]delphi±àÒë´íÎóÖÐÓ¢¶ÔÕÕ±í

ÔÚ±àÒëdelphi³ÌÐòʱ»á³öÏÖÔÚЩÌáʾ£¬È«ÊÇEÎĵģ¬ÏÖÔÚ¸ø´ó¼ÒÒ»¸ö¶ÔÕÕ±í£¬¿ÉÒÔ¸üºÃµÄÀí½â´íÎóÌáʾÐÅÏ¢£¡
';' not allowed before 'ELSE' ElSEÇ°²»ÔÊÐíÓГ;”
'' clause not allowed in OLE automation section ÔÚOLE×Ô¶¯Çø¶Î²»ÔÊÐí“”×Ó¾ä
'' is not a type identifier ²»ÊÇÀàÐͱêʶ·û
'' not prev ......

ÓÃSPCOMM ÔÚ DelphiÖÐʵÏÖ´®¿ÚͨѶ

ÓÃDelphi ʵÏÖ´®¿ÚͨѶ£¬³£Óõļ¸ÖÖ·½·¨Îª£ºÊ¹ÓÿؼþÈçMSCOMMºÍSPCOMM£¬Ê¹ÓÃAPIº¯Êý»òÕßÔÚDelphi Öе÷ÓÃÆäËü´®¿ÚͨѶ³ÌÐò¡£ÀûÓÃAPI±àд´®¿ÚͨÐųÌÐò½ÏΪ¸´ÔÓ£¬ÐèÒªÕÆÎÕ´óÁ¿Í¨ÐÅ֪ʶ£¬ÆäÓŵãÊÇ¿ÉʵÏֵŦÄܸüÇ¿´ó£¬Ó¦ÓÃÃæ¸ü¹ã·º£¬¸üÊʺÏÓÚ±àд½ÏΪ¸´ÔÓ µÄµÍ²ã´ÎͨÐųÌÐò¡£Ïà±È½Ï¶øÑÔ£¬ÀûÓÃSPComm¿Ø¼þÔòÏà¶Ô½Ï¼òµ¥£¬¸Ã¿Ø¼þ¾ßÓ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ