Explorar el Código

* Refactored test

git-svn-id: trunk@10752 -
joost hace 17 años
padre
commit
5ce1eb0dcb
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      packages/fcl-db/tests/testfieldtypes.pas

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

@@ -946,7 +946,7 @@ procedure TTestFieldTypes.TestNumericNames;
 begin
   with TSQLDBConnector(DBConnector) do
     begin
-    if sqQuoteFieldnames in Connection.ConnOptions then
+    if not (SQLDbType in MySQLdbTypes) then
       Connection.ExecuteDirect('create table FPDEV2 (         ' +
                                 '  "2ID" INT NOT NULL            , ' +
                                 '  "3TEST" VARCHAR(10),     ' +