From 203331cc3ade7bd9fc30096cd23d88618146bdcb Mon Sep 17 00:00:00 2001
From: joost <joost@cnoc.nl>
Date: Sun, 17 Feb 2008 21:14:26 +0000
Subject: [PATCH]  * Fixed bug #8464

git-svn-id: trunk@10350 -
---
 packages/fcl-db/src/base/db.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/packages/fcl-db/src/base/db.pas b/packages/fcl-db/src/base/db.pas
index 331a14e45e..7be191898b 100644
--- a/packages/fcl-db/src/base/db.pas
+++ b/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;