Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Dividir un TIME por un numero de repeticiones (https://www.clubdelphi.com/foros/showthread.php?t=39275)

creus 15-01-2007 23:37:05

Dividir un TIME por un numero de repeticiones
 
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 16-01-2007 17:34:13

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:
Código Delphi [-]
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:
Código Delphi [-]
var
  hora: TTime;
begin
  hora := frac(now);    
  Label1.Caption := FloatToStr(hora);     
  Label2.Caption := FloatToStr(hora/5);

creus 16-01-2007 21:19:25

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

Gracias de nuevo.


La franja horaria es GMT +2. Ahora son las 02:23:56.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi