Browse Source

* Fix missing ftLongWord

git-svn-id: branches/fixes_3_2@48708 -
michael 4 years ago
parent
commit
4f32872a71
1 changed files with 2 additions and 0 deletions
  1. 2 0
      packages/fcl-db/src/sqldb/mysql/mysqlconn.inc

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

@@ -1232,11 +1232,13 @@ begin
       VL := InternalStrToInt64(Source, Len);
       Move(VL, Dest^, SizeOf(LargeInt));
       end;
+{$IF FPC_FULLVERSION >=30301}      
     ftLongWord:
       begin
       VO := InternalStrToDWord(Source, Len);
       Move(VO, Dest^, SizeOf(LongWord));
       end;
+{$ENDIF}      
     ftFloat:
       begin
       VF := InternalStrToFloat(Source, Len);