diff --git a/packages/fcl-db/src/base/dsparams.inc b/packages/fcl-db/src/base/dsparams.inc index 9c45884854..790dc270e8 100644 --- a/packages/fcl-db/src/base/dsparams.inc +++ b/packages/fcl-db/src/base/dsparams.inc @@ -428,7 +428,7 @@ begin for i:=0 to High(ParamPart) do begin CopyLen:=ParamPart[i].Start-BufIndex; - Move(SQL[BufIndex],NewQuery[NewQueryIndex],CopyLen); + System.Move(SQL[BufIndex],NewQuery[NewQueryIndex],CopyLen); Inc(NewQueryIndex,CopyLen); case ParameterStyle of psInterbase : begin @@ -454,7 +454,7 @@ begin end; CopyLen:=Length(SQL)+1-BufIndex; if CopyLen > 0 then - Move(SQL[BufIndex],NewQuery[NewQueryIndex],CopyLen); + System.Move(SQL[BufIndex],NewQuery[NewQueryIndex],CopyLen); end else NewQuery:=SQL;