Ver Mensaje Individual
  #2  
Antiguo 16-01-2007
Avatar de Crandel
[Crandel] Crandel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Parana, Argentina
Posts: 1.475
Reputación: 23
Crandel Va por buen camino
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);
__________________
[Crandel]
Responder Con Cita