浏览代码

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