Обновлено: 01 декабря, 2018

Функция IsValidDateTime в Delphi

Используемый модуль: DateUtils

Описание:

Определяет допустимость указанных значений года AYear, месяца AMonth, дня ADay, часа AHour, минуты AMinute, секунды ASecond, и миллисекунды AMilliSecond.

Синтаксис:

function IsValidDateTime(const AYear, AMonth, ADay, AHour, AMinute, ASecond, AMilliSecond: Word): Boolean;

Пример использования:

uses DateUtils;
...
var
  Res: Boolean;
begin
  Res:= IsValidDateTime(199, 12, 10, 10, 9, 8, 7); // проверяем допустимость значений для  10 дня декабря месяца 
                                                   // 1999 года 10 часов 9 минут 8 секунд и 7 миллисекунд
  If Res Then
    ShowMessage('TRUE')
  Else
    ShowMessage('FALSE');
end;

Результат:

IsValidDateTime в Delphi