MonthDays - это функция
Сколько дней в месяце Dt при 5,6,7-дн неделе
MonthDays( Dt, <5, 6 или 7> )
MonthDays( Date(), 5 )
Полезные функции
Функции Delphi