Diferença entre datas e horas

Delphi

29/04/2007

Ola Pessoal

Como faço para ter a diferença entre datas e horas

Por exemplo

funcionario entrou no dia 12/03/2007 as 22:00 e saiu
no 13/03/2007 as 03:00, como poderia fazer uma
funçao que me devolva a quantidade de horas
trabalhadas neste tipo de exemplo?

Grato


Claudio


Claudiocjr

Claudiocjr

Curtidas 0

Respostas

Massuda

Massuda

29/04/2007

Converta os data/hora de entrada e saida para TDateTime, faça a diferença entre a saída e a entrada e multiplique o resultado por 24.

Todo TDateTime representa um instante no tempo expresso em dias. Por exemplo, um TDateTime com valor 1.5 equivale a 1 dia e 12 horas.


GOSTEI 0
Claudiocjr

Claudiocjr

29/04/2007

Obrigado pela colaboração

Mas poderia me explicar uma coisa?

Eu Tenho um campo onde informo a data de entrada e outro a hora de
entrada e mais dois campos de saida, de Data e outro Hora
de saída, de que maneira converter para TDateTime.

Converter cada campo e somar??

Poderia fazer um exemplo?

SDS

Claudio


GOSTEI 0
Massuda

Massuda

29/04/2007

Converter cada campo e somar??
var
  Horario: TDateTime;
...
  Horario := StrToDate(´30/04/2007´) + StrToTime(´10:07´)



GOSTEI 0
POSTAR