Pārlūkot izejas kodu

* Use factory for fielddefs

git-svn-id: trunk@26787 -
michael 12 gadi atpakaļ
vecāks
revīzija
4378063247
1 mainītis faili ar 1 papildinājumiem un 1 dzēšanām
  1. 1 1
      packages/fcl-db/src/sqldb/sqlite/sqlite3conn.pp

+ 1 - 1
packages/fcl-db/src/sqldb/sqlite/sqlite3conn.pp

@@ -492,7 +492,7 @@ begin
                end;
       ftUnknown : DatabaseError('Unknown record type: '+FN);
     end; // Case
-    tfielddef.create(fielddefs,FieldDefs.MakeNameUnique(FN),ft1,size1,false,i+1);
+    Fielddefs.Add(FieldDefs.MakeNameUnique(FN),ft1,size1,false,i+1);
     end;
 end;