May be, that this can be fixed in sqldb.pp in function TSQLConnection.GetAsSQLText(Param: TParam) : string; ... - ftFloat : Result := FloatToStr(Param.AsFloat, FSQLFormatSettings); + ftFloat : Result := FloatToStrF(extended(Param.AsFloat), ffGeneral, 16, 0, FSQLFormatSettings); ... for me it seems, that works ... See atached program. What do you think ? -Laco.
But that won't solve the writing of truncated data as long as doubles are passed as a string to mysql. Ludo
_______________________________________________ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
