Explorar o código

* Fixed TestBlobSize test

git-svn-id: trunk@12509 -
joost %!s(int64=16) %!d(string=hai) anos
pai
achega
0899d13e3a
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  1. 1 0
      packages/fcl-db/tests/testfieldtypes.pas

+ 1 - 0
packages/fcl-db/tests/testfieldtypes.pas

@@ -477,6 +477,7 @@ begin
 
 
   with TSQLDBConnector(DBConnector).Query do
   with TSQLDBConnector(DBConnector).Query do
     begin
     begin
+    sql.text := 'select * from FPDEV2';
     Open;
     Open;
     AssertEquals(14,TBlobField(fields[0]).BlobSize);
     AssertEquals(14,TBlobField(fields[0]).BlobSize);
     close;
     close;