Código Delphi [-]Km := StringReplace(FloatToStr(ConsultaKm.Value),',','+',[rfreplaceall]);
Km := StringReplace(FloatToStr(ConsultaKm.Value),',','+',[rfreplaceall]);