CompareTime

> [HTML Version](comparetime.html)

**Синтаксис**

````
function CompareTime:(A, B: TDateTime): ShortInt;

````
**Описание**

Сравнивает время переменных A и B. Возвращает: "-1" при A < B; "0" при A = B; "1" при A > B.  

**Пример кода**

````
var  
  aTime1, aTime2: TDateTime;  
  I: Integer;  
begin  
  aTime1:= Now;                     // текущее время  
  aTime2:= IncHour(aTime1, 1);      // увеличить время на 1 час  
  I := CompareTime(aTime1, aTime2); // сравнить время, результат I = "-1"  
end.
````