Problema con FloatToStr

[amadis]

Prueba con el comando FloatToStrF

Es un comando practico que permite sobrecarga y te pasa el resultado a donde quieras, variable o al edit.

Aqui dejo una ayuda.

The FloatToStrF function converts a floating point number Value into a displayable string, with great control over the formatting via the Format, Precision, and Digits values.

The Value type may be any of the floating point types.

The Format parameter is defined by the TFloatFormat (SysUtils) type :
ffCurrency eg : ?2,345.60
ffExponent eg : 2.3456E+04
ffFixed eg : 2345.60
ffGeneral eg : 2345.6
ffNumber eg : 2,345.6

[ecfisa]

Hola Kubelo.

Sigo sin entender como es posible (dado el código que presentaste) que enviándo como argumento a SetFloat el valor 0.00001 obtengas el resultado -15.
Eso me hace preguntar si no tendrás algún problema con Delphi...


Saludos.

[Kubelo]

Empezado por ecfisa

Hola Kubelo.

Sigo sin entender como es posible (dado el código que presentaste) que enviándo como argumento a SetFloat el valor 0.00001 obtengas el resultado -15.
Eso me hace preguntar si no tendrás algún problema con Delphi...


Saludos.

Creo que nos hemos malentendido ecfisa, a la función no le llega 0,000001, sino 1e-05, pero realmente lo original si es 0,000001. No se si ahora me he expresado con claridad.

Mañana sin falta pruebo el FloatToStrF, me dejaste intrigado amadis.

Gracias a todos!

[ecfisa]

Empezado por Kubelo

Creo que nos hemos malentendido ecfisa, a la función no le llega 0,000001, sino 1e-05, pero realmente lo original si es 0,000001. No se si ahora me he expresado con claridad.

Mañana sin falta pruebo el FloatToStrF, me dejaste intrigado amadis.

Gracias a todos!

En realidad si el envías 0.00001, 1E-05, 1/100000 o 10 ^(-5) es indiferente ya que estamos hablando del mismo número representado en formatos diferentes. Lo que no entiendo es como obtenes los resultados -15 y -25.

Utilizando el número 1E-05 o 0.00001, tanto con FloatToStrF como con FormatFloat obtenés el resultado esperado: 0,00001

Código Delphi [-]
...
var
  x: Double;
begin
  x:= 1E-05; // del mismo modo funciona con: 12325,12345/-12345,12345, 56789.00003/-56789.00003, etc
  ShowMessage(FloatToStrF(x, ffFixed,10, 5)     // 0,00001
              +#10#13+
              FormatFloat('0.##.########', x)); // 0,00001

Sigo sin entender el problema... ¿ Podés ponernos algunos valores que enviados a SetFloat te provocan resultados indeseados ?

Saludos.

[Kubelo]

Bueno pues tal y como me temía el FloatToStrF, tampoco funciona.

ecfisa, los valores que me fallan son siempre 0,0000... a partir de 5 decimales que es cuando lo pasa a exponencial, y siempre "0,", es decir el valor 1,00001 lo coge bien, pero el 0,00001 ya no lo coge bien.

Gracias

[Casimiro Noteví]

Y de dónde salen esos números, ¿una función, un reloj, al azar, algún usuario que los escribe?

[Kubelo]

Empezado por Casimiro Notevi

Y de dónde salen esos números, ¿una función, un reloj, al azar, algún usuario que los escribe?

Introducidos por el usuario.