[delphidsg]

Есть текущее время — currentTime.
Есть время, задаваемое с помощью MaskEdit — eventTime.
Нужно расчитать время от currentTime до eventTime.
(проблема возникла, при значениях eventTime меньших чем currentTime)
Буду очень признателен.

[lmikle]

А в чем собственно проблема?
TDateTime по сути есть число с фиксированной точкой. И все операции с ним вполне возможны.

Код:

if currentTime < eventTime
  Then ShowMessage(TimeToStr(eventTime-currentTime))
  Else ShowMessage('-' + TimeToStr(currentTime-eventTime));

[NumLock]

Код:

uses
  DateUtils,
...
var
  currentTime, eventTime: TDateTime;
begin
  currentTime:=Now;
  eventTime:=currentTime+1;
  Edit1.Text:=IntToStr(SecondsBetween(currentTime, eventTime));
//  SecondsBetween
//  MinutesBetween()
//  HoursBetween()
end;