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