¼ÓÈëÊÕ²Ø | ÉèΪÊ×Ò³ | »áÔ±ÖÐÐÄ | ÎÒҪͶ¸å Àî´óͬ £¨https://www.lidatong.com.cn/£©- ¿Æ¼¼¡¢½¨Õ¾¡¢¾­Ñé¡¢ÔÆ¼ÆËã¡¢5G¡¢´óÊý¾Ý,Õ¾³¤Íø!
µ±Ç°Î»Ö㺠Ê×Ò³ > ´óÊý¾Ý > ÕýÎÄ

ΪʲôijЩ²ÎÊýÔÚDelphiÖÐÒÔ¡°A¡±ÎªÇ°×º£¿

·¢²¼Ê±¼ä£º2020-12-15 03:52:10 ËùÊôÀ¸Ä¿£º´óÊý¾Ý À´Ô´£ºÍøÂçÕûÀí
µ¼¶Á£ºÔÚDelphi±àÂë±ê×¼ÖÐ,ÔÚº¯Êý/¹ý³ÌÖÐÔÚ²ÎÊýÃû֮ǰÌí¼ÓAǰ׺µÄ¹æÔòÊÇʲô£¿ ÀýÈ磺 constructor Create(AOwner: TComponent); override;constructor CreateNew(AOwner: TComponent; Dummy: Integer = 0); virtual;procedure AddAncestor(Component: TComponent)
ÔÚDelphi±àÂë±ê×¼ÖÐ,ÔÚº¯Êý/¹ý³ÌÖÐÔÚ²ÎÊýÃû֮ǰÌí¼ÓAǰ׺µÄ¹æÔòÊÇʲô£¿

ÀýÈ磺

constructor Create(AOwner: TComponent); override;
constructor CreateNew(AOwner: TComponent; Dummy: Integer = 0); virtual;
procedure AddAncestor(Component: TComponent); //No A prefix,why?

function FindClass(const ClassName: string): TPersistentClass; //No A prefix,why?
function GetClass(const AClassName: string): TPersistentClass;
procedure StartClassGroup(AClass: TPersistentClass);
procedure GroupDescendentsWith(AClass,AClassGroup: TPersistentClass);

¸ü¶àµÄÀý×ÓÊÇDelphi¹«¹²Àà(²Î¼ûÀà,±í¸ñµÈ).Òò´ËÎÒµÄÎÊÌâ ¨C ʲôʱºòÌí¼ÓºÍºÎʱÌí¼Ó£¿

½â¾ö·½·¨

ͨ³£ÔÚ»á³öÏÖÃû³Æ³åͻʱ½øÐÐ.ÀýÈç,ÔÚTComponent¹¹Ô캯ÊýÖÐ,ÏëÏóËüÊÇ·ñ±»Ð´È룺
constructor TComponent.Create(Owner: TComponent)

ÏÖÔÚ,Owner²ÎÊýÒþ²ØÁËʵÀýµÄOwnerÊôÐÔ.Òª²Î¿¼¸ÃÊôÐÔ,Äú±ØÐë±àдSelf.Owner.

ÔÚVCLÔ´´úÂëÖÐ,Äú¿ÉÄܻᷢÏÖÔÚ´æÔÚ´ËÀà³åͻʱʹÓÃAǰ׺,¶øÔÚûÓгåͻʱÔò²»Ê¹ÓÃ.µ«¸Ã¹«Ô¼µÄÊÊÓý«´æÔÚ²»Ò»ÖÂÖ®´¦.

ÎÒ¸üÏ£ÍûEmbarcadero Pascal style guide»á¾Í´ËÊÂ˵Щʲô,µ«Òź¶µÄÊÇËüÈÔ±£³Ö³ÁĬ.

ÎÒ¸öÈË´ÓÀ´Ã»ÓÐÔÚÎÒдµÄ´úÂëÖÐʹÓÃAǰ׺.¸ù¾ÝÎҵľ­Ñé,Òþ²Ø×ÜÊǺܺÃ,ÒòΪÄúͨ³£ÏëÒªÒýÓõÄÊDzÎÊý¶ø²»ÊÇʵÀý³ÉÔ±.Èç¹ûÄúÐèÒªÒýÓÃʵÀý³ÉÔ±,ÔòSelf.Name¿ÉÒÔÏû³ýÆçÒå.

ËùÒÔ,ûÓйæÔò,Ö»ÊÇÓɸöÈËÆ«ºÃ¾ö¶¨µÄ¹ßÀý.×ö³ö×Ô¼ºµÄÑ¡Ôñ²¢¼á³ÖÏÂÈ¥.Ò»ÖÂÐÔÔ¶±ÈÄúÊÇ·ñÑ¡ÔñʹÓôËÀàÃüÃûÔ¼¶¨¸üÎªÖØÒª.

£¨±à¼­£ºÀî´óͬ£©

¡¾ÉùÃ÷¡¿±¾Õ¾ÄÚÈݾùÀ´×ÔÍøÂ磬ÆäÏà¹ØÑÔÂÛ½ö´ú±í×÷Õ߸öÈ˹۵㣬²»´ú±í±¾Õ¾Á¢³¡¡£ÈôÎÞÒâÇÖ·¸µ½ÄúµÄȨÀû£¬Ç뼰ʱÓëÁªÏµÕ¾³¤É¾³ýÏà¹ØÄÚÈÝ!

    ÍÆ¼öÎÄÕÂ
      ÈȵãÔĶÁ