IsValidDate
Модуль: DateUtils
function IsValidDate(const AYear, AMonth, ADay: Word): Boolean;
Функция проверяет, являются ли данный год, месяц и день правильной датой. Если это так, функция возвращает True (в противном случае — False ). Год должен быть числом от 1 до 9999; AMonth — число от 1 до 12, а ADay с правильным номером, обозначающим номер дня в месяце (в зависимости от месяца).
Пример использования:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
program FooApp; {$APPTYPE CONSOLE} uses DateUtils; begin // wyświetli FALSE ponieważ czerwiec w 2006 miał jedynie 30 dni Writeln( IsValidDate(2006, 06, 31) ); Readln; end. |