소스 검색

* Refactored test

git-svn-id: trunk@10752 -
joost 17 년 전
부모
커밋
5ce1eb0dcb
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  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),     ' +