Ver Mensaje Individual
  #2  
Antiguo 20-05-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por Cristhor1982 Ver Mensaje
Ahora bien, quiero que el timer lo haga avanzar desde la hora capturada...se entiende?.
Hola.

Bueno, espero que si...

Ejemplo:
Código Delphi [-]
implementation  

uses DateUtils;

var
  CampoHora : TTime;

procedure TForm1.FormCreate(Sender: TObject);
begin
  CampoHora := Time;
// En tu caso sería: CampoHora := TuDataSet.FieldByName('FECHA').AsDateTime; 
  Label1.Caption := FormatDateTime('hh:mm:ss', CampoHora);
  Timer1.Interval := 1000;
  Timer1.Enabled := True;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  CampoHora := IncSecond(CampoHora);
  Label1.Caption := FormatDateTime('hh:mm:ss', CampoHora);
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita