Delphi - decimales despues de la coma

P

Primero os planteo mi problema matematicamente.

El resultado de una operacion es 33.1234 min y yo quiero minutos y segundos por separado. Simplemente separo el 33 de lo que va despues de la coma y lo que hay despues de la coma hago 0,1234*60 y obtengo los segundos.

La cosa quedaria 33.1234 min - 33 min - 0,1234*60 s

Hasta aqui la cosa es sencilla.

Ahora tema programacion.

Digamos que tengo label1 donde aparece los minutos totales con la variable declarada mtot y despues tenemos label2 con la misma variable que en label1 pero haciendo Format('%0.4f',[mtot]) para obtener el 33 suelto y asi tener los minutos por separado.

Yo quiero poder operar con lo que va despues de la , de la variable mtot y lo unico que se me ha ocurrido es hacer label1 (que es 33.1234) - label2 (que es 33) para poder conseguir en 0.1234 y posteriormente multiplicarlo por 60 y obtener los segundos por separado.

Estoy trabajando con el delphi 3 para los que me ayudeis.

Muchas gracias mediavideros.

Salu2

P

Inspiracion divina y solucionado :)

X:=(X-INT(X))*60;

Usuarios habituales