MonthOf
Модуль: DateUtils
function MonthOf(const AValue: TDateTime): Word;
Функция возвращает номер месяца, сохраненный как дата TDateTime . Функция возвращает число от 1 до 12:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
program Foo; {$APPTYPE CONSOLE} uses SysUtils, DateUtils; begin Writeln('Дата: ', DateTimeToStr(Now)); Writeln('-----'); Writeln('Месяц: ', MonthOf(Now)); Readln; end. |
Функция работает так же, как MonthOfTheYear