É o problema que estou tendo aqui é isso, pois o usuário digitar 
Inicial : 07:30 
Final: 24:00
o resultado teria que dar : 16:30

Só que como ele não reconhece o 24:00, não faz o  calculo.






--- Em delphi-br@yahoogrupos.com.br, Roni Rodrigo <ronirodr...@...> escreveu
>
> cara... acredito que 24:00 não seja uma hora válida mesmo... o dia vai 
> até de 0:00 até 23:59 ...
> o/
> 
> Em 26/08/2010 18:48, alexsandro_qs escreveu:
> > Boa noite pessoal;
> >
> > Eu tinha feito uma forma de subtrair 2 horas aqui, e até à um tempinho
> > atrás, estava tudo ok. Só que agora pintou um problema:
> >
> > era feito assim:
> > -------------------------------
> > var
> > h1, h2, resultado : TDateTime;
> > begin
> >
> > d1:= StrToTime(adotDatainicial.Value);
> > d2:= StrToTime(adotDatainicia2.Value);
> > resultado := d2 - d1;
> >
> > -------------------------------
> > Só que quando é digitado 24:00, esse valor não é reconhecido
> > como horas ai os erros.
> >
> > Alguém poderia me ajudar com isso ?
> >
> > OBS.: a hora nunca vai passar de 24:00 ( ou seja de um dia para o outro)
> >
> > Ex.: saída 24:00 - entrada 01:00 = 23:00 e não 23:60
>


Responder a