suponiendo que son variables TDateTime, en delphi seria
Código Delphi
[-]var
diferenciaDias:Integer;
diferenciaHoras:TDateTime;
begin
diferenciaDias := Trunc(fichada2) - Trunc(fichada1);
diferenciaHoras := Frac(fichada2) - frac(fichada1);
ShowMessage('diferencia en dias: ' + IntToStr(diferenciadias));
ShowMessage('diferencia en horas: ' + FormatDateTime('hh:nn:ss', diferenciahoras);
end;
Cita:
Empezado por zugazua2001
Hola amigos del foro, tengo dos campos por separado uno es la hora y el otro es la fecha de la fichada de un empleado.
Existe algun modo de concatenar obtener la diferencia en horas de dos fichadas de un empleado de manera rapida.
Ejm:
fichada 1: hora: 05:05 fecha: 01/03/2006
fichada 2: hora: 12:06 fecha: 02/03/2006
Cant Horas: 31 horas 1 minuto.
Gracias por todo nuevamente.
Saludos
|