SameTime

> [HTML Version](sametime.html)

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

````
function SameTime(A, B: TDateTime): Boolean;

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

Показывает, совпадают ли значения времени в двух значениях TDateTime.

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

````
var  
  aDate1, aDate2: TDateTime;  
  aBool: Boolean;  
begin  
  aDate1:= Now;                     // текущее время  
  aDate2:= IncMinute(aDate1, 1);    // увеличить время на 1 минуту  
  aBool:= SameTime(aDate1, aDate2); // сравнить время  
  
  if aBool then  
    // если совпадает выдать сообщение:  
    ShowMessageClient(GetClientName, '', 'Время совпадает', clGray)  
  else  
    // иначе сообщение:  
    ShowMessageClient(GetClientName, '', 'Время не совпадает', clGray);  
end.
````