Merged revisions 10350 via svnmerge from

svn+ssh://[email protected]/FPC/svn/fpc/trunk

........
  r10350 | joost | 2008-02-17 22:14:26 +0100 (Sun, 17 Feb 2008) | 1 line
  
   * Fixed bug #8464
........

git-svn-id: branches/cleanroom@10446 -

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

@@ -214,6 +214,7 @@ type
     procedure Add(const AName: string; ADataType: TFieldType); overload;
     Function AddFieldDef : TFieldDef;
     procedure Assign(FieldDefs: TFieldDefs); overload;
+    function Find(const AName: string): TFieldDef;
 //    procedure Clear;
 //    procedure Delete(Index: Longint);
     procedure Update; overload;