Răsfoiți Sursa

fcl-db: mysql: for BINARY and VARBINARY data types ignore connection CharSet (CharSize does not play role here)

git-svn-id: trunk@39002 -
lacak 7 ani în urmă
părinte
comite
7b7d9b1cde
1 a modificat fișierele cu 5 adăugiri și 2 ștergeri
  1. 5 2
      packages/fcl-db/src/sqldb/mysql/mysqlconn.inc

+ 5 - 2
packages/fcl-db/src/sqldb/mysql/mysqlconn.inc

@@ -765,12 +765,15 @@ begin
       else
         NewType := ftString;
 {$IFDEF MYSQL50_UP}
-      if AField^.charsetnr = 63 then //BINARY vs. CHAR, VARBINARY vs. VARCHAR
+      if AField^.charsetnr = 63 then begin //BINARY vs. CHAR, VARBINARY vs. VARCHAR
         if NewType = ftFixedChar then
           NewType := ftBytes
         else
           NewType := ftVarBytes;
-      NewSize := ASize div FConnectionCharsetInfo.mbmaxlen;
+        NewSize := ASize;
+      end
+      else
+        NewSize := ASize div FConnectionCharsetInfo.mbmaxlen;
 {$ELSE}
       NewSize := ASize;
 {$ENDIF}