fcl-db: sqlite: increase max allowed column length. Fix for existing test TestStringLargerThen8192.

git-svn-id: trunk@23141 -

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

@@ -477,7 +477,7 @@ begin
                  size1 := 255; //sql: if length is omitted then length is 1
                  size2 := 0;
                  ExtractPrecisionAndScale(FD, size1, size2);
-                 if size1 > dsMaxStringSize then size1 := dsMaxStringSize;
+                 if size1 > MaxSmallint then size1 := MaxSmallint;
                end;
       ftBCD:   begin
                  size2 := MaxBCDPrecision; //sql: if a precision is omitted, then use implementation-defined