Jelajahi Sumber

* Refactored test

git-svn-id: trunk@10752 -
joost 17 tahun lalu
induk
melakukan
5ce1eb0dcb
1 mengubah file dengan 1 tambahan dan 1 penghapusan
  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),     ' +