Calculo de tiempos

[jafera]

Gracias a los dos

La solucion de noshy funciona de fábula.

Casimiro creo que no es una ubicacion de parentesis pues falla igual

Saludos

Josep

[delphi.com.ar]

¿Mi pregunta es para que conviertes un número a un string si luego vuelves a convertirlo a un valor numérico?... FloatToStr te va a convertir a string un número decimal el cual no va a aceptar StrToInt ya que espera un número entero. ¿No querrás truncar el resultado de la operación?.. en ese caso:

Código Delphi [-]
Hores := Trunc(K) div 3600

Agrego: No había leído la respuesta de noshy

[jafera]

Gracias tambien por tu respuesta

Ahora necesitaria saber como le digo a esta linea que el Edit1.text tenga solo dos decimales

Código Delphi [-]
 
Edit1.Text:= FloatToStr(StrToFloat(JvValidateEdit1.Text)/I);

Es un campo que no se guarda en ninguna tabla.

Gracias

Josep

[rrf]

Quizás esto te sirva:

Código Delphi [-]
  Edit1.Text:= FloatToStr(
                int ( ( StrToFloat(JvValidateEdit1.Text)/I ) *100 ) /100
                          );

Está hecho "a ojo", no lo he probado, pero seguramente te funcionará.

Saludos.

[jafera]

Perfecto rrf, además le he añadido al final Km/h y queda una presentación profesionas....

Gracias

Josep

[noshy]

yo usaria la funcion FloatToStrF(), me parece que menos quilombo.

Código Delphi [-]
Edit1.Text:= FloatToStrF(StrToFloat(JvValidateEdit1.Text)/I, ffFixed, 8, 2 );

[jafera]

Gracias noshy, funciona correctamente y posiblemente sea mas ortodoxo

Saludos

Josep