فهرست منبع

* Make sure fpdoc can parse through classes

git-svn-id: trunk@10771 -
michael 17 سال پیش
والد
کامیت
2109a8b611
1فایلهای تغییر یافته به همراه3 افزوده شده و 0 حذف شده
  1. 3 0
      rtl/objpas/classes/classesh.inc

+ 3 - 0
rtl/objpas/classes/classesh.inc

@@ -1535,7 +1535,10 @@ type
     //!!!!   Flags: Word; var Params; VarResult, ExcepInfo, ArgErr: Pointer): Integer; stdcall;
   public
     //!! Moved temporary
+    // fpdoc doesn't handle this yet :(
+{$ifndef fpdocsystem}
     function IInterfaceComponentReference.GetComponent=iicrgetcomponent;
+{$endif}    
     procedure WriteState(Writer: TWriter); virtual;
     constructor Create(AOwner: TComponent); virtual;
     procedure BeforeDestruction; override;