Browse Source

* TFieldDef.Create must be defined as override instead of overload so that in case of loading from stream the right constructor is called

git-svn-id: trunk@12522 -
joost 16 years ago
parent
commit
cb2f3d744d
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/fcl-db/src/base/db.pas

+ 1 - 1
packages/fcl-db/src/base/db.pas

@@ -182,7 +182,7 @@ type
     procedure SetSize(const AValue: Integer);
     procedure SetRequired(const AValue: Boolean);
   public
-    constructor create(ACollection : TCollection); overload;
+    constructor create(ACollection : TCollection); override;
     constructor Create(AOwner: TFieldDefs; const AName: string;
       ADataType: TFieldType; ASize: Integer; ARequired: Boolean; AFieldNo: Longint); overload;
     destructor Destroy; override;