Ayuda acumular Horas

[[cHackAll]]

Empezado por jhonny

(Si nos muestras tu codigo, seguramente podríamos ayudarte)

Muy cierto!

Código Delphi [-]
var Start, Last: TTimeStamp; Horas: Cardinal;
begin
 Start := DateTimeToTimeStamp(Now);

...
Sleep(1000); // simplemente para tener una idea!
...

 Last := DateTimeToTimeStamp(Now);
 Horas := ((Last.Date - Start.Date) * 24) + ((Last.Time - Start.Time) div MSecsPerDay);
end;

Un cronometro?