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