fcl-db: tests: basic test for ftWideString and ftWideMemo for SQLite. Tests if these field types are recognized when saving/restoring to XML format. See rev.22997

git-svn-id: trunk@23037 -

packages/fcl-db/tests/sqldbtoolsunit.pas

@@ -246,6 +246,8 @@ begin
       FieldtypeDefinitions[ftBytes] := 'BINARY(5)';
       FieldtypeDefinitions[ftVarBytes] := 'VARBINARY(10)';
       FieldtypeDefinitions[ftMemo] := 'CLOB'; //or TEXT SQLite supports both, but CLOB is sql standard (TEXT not)
+      FieldtypeDefinitions[ftWideString] := 'NVARCHAR(10)';
+      FieldtypeDefinitions[ftWideMemo] := 'NCLOB';
       end;
   end;
 

packages/fcl-db/tests/toolsunit.pas

@@ -313,6 +313,8 @@ begin
   testValues[ftDate] := testDateValues;
   testValues[ftBlob] := testStringValues;
   testValues[ftMemo] := testStringValues;
+  testValues[ftWideString] := testStringValues;
+  testValues[ftWideMemo] := testStringValues;
   testValues[ftFMTBcd] := testFmtBCDValues;
   for i := 0 to testValuesCount-1 do
     begin