From 09d9f28b4d76a164cd61d93833a157344ee1a42d Mon Sep 17 00:00:00 2001 From: michael Date: Thu, 18 Feb 2021 11:03:12 +0000 Subject: [PATCH] * Merging revisions 48708 from branches/fixes_3_2: ------------------------------------------------------------------------ r48708 | michael | 2021-02-18 11:59:39 +0100 (Thu, 18 Feb 2021) | 1 line * Fix missing ftLongWord ------------------------------------------------------------------------ git-svn-id: tags/release_3_2_2_rc1@48709 - --- packages/fcl-db/src/sqldb/mysql/mysqlconn.inc | 2 ++ 1 file changed, 2 insertions(+) diff --git a/packages/fcl-db/src/sqldb/mysql/mysqlconn.inc b/packages/fcl-db/src/sqldb/mysql/mysqlconn.inc index f90fd9f310..13215f11b8 100644 --- a/packages/fcl-db/src/sqldb/mysql/mysqlconn.inc +++ b/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);