Hombre, muy normal, muy normal, esto no es:
Código Delphi
[-]
Memo1.Lines.add(DateTimeToStr(StrtoTime('12:00'))+' - '+DateTimeToStr(StrtoTime('13:00')));
Memo1.Lines.add(IntToStr(MinutesBetween(StrToTime('12:00'), StrToTime('13:00'))));
Memo1.Lines.add(DateTimeToStr(StrtoTime('13:00'))+' - '+DateTimeToStr(StrtoTime('14:00')));
Memo1.Lines.add(IntToStr(MinutesBetween(StrToTime('13:00'), StrToTime('14:00'))));
Resultado:
Cita:
30/12/1899 12:00:00 - 30/12/1899 13:00:00
59
30/12/1899 13:00:00 - 30/12/1899 14:00:00
60
|