Dividir un TIME por un numero de repeticiones

[creus]

Hola,

Estoy intentando sumar una serie de segundos, usando como cronometro la hora del sistema iniciazada a 0.
La variable de tipo TIME que al final tendrá un determinado numero de segundos, he de dividirla por un numero aleatorio ( 5 por ejemplo ).

No se si hay manera de poder dividir un Time entre una cifra entera o real??


Gracias a todos.

[Crandel]

La variable TTime es tratada en delphi como un numero real, donde la parte entera son los dias y los decimales la hora.

entonces cualquier tiempo se puede dividir tanto por un entero como por un real.

Aca te escribo un pequeno ejemplo:

var
hora: TTime;
begin
hora := frac(now); // tomamos la hora actual, quitandole los dias
Label1.Caption := TimeToStr(hora); // hora actual
Label2.Caption := TimeToStr(hora/5); // hora dividido 5


o para ver los valores reales:

var
hora: TTime;
begin
hora := frac(now);
Label1.Caption := FloatToStr(hora);
Label2.Caption := FloatToStr(hora/5);

[creus]

Gracias Candel me ha servido de mucha ayuda. Solucione el problema.

Gracias de nuevo.