FGarcia
18-01-2006, 23:07:25
Que tal Foristas!
He buscado en los hilos pero no he encontrado algo como esto; necesito un cronometro, es decir un indicador del tiempo transcurrido desde que se inicio un proceso. Pense en que una sencilla operacion de sustraccion me lo haria:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
TiempoInicio := Now;
Label1.Caption := TimeToStr(Now - TiempoInicio);
end;
El intervalo del timer lo tengo a 2.
El resultado que obtengo es: 12:00:00 a.m. yo esperaba algo asi: 00:00:00
Tal vez esta tan facil que no lo veo. Gracias por la ayuda
He buscado en los hilos pero no he encontrado algo como esto; necesito un cronometro, es decir un indicador del tiempo transcurrido desde que se inicio un proceso. Pense en que una sencilla operacion de sustraccion me lo haria:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
TiempoInicio := Now;
Label1.Caption := TimeToStr(Now - TiempoInicio);
end;
El intervalo del timer lo tengo a 2.
El resultado que obtengo es: 12:00:00 a.m. yo esperaba algo asi: 00:00:00
Tal vez esta tan facil que no lo veo. Gracias por la ayuda