Последний день месяца

← →
Harm (2004-02-19 16:34) [0]

Как вычислить?

← →
Sam Stone © (2004-02-19 16:42) [1]

Тебе на какой день выпадет?
Тогда так:
DayOfTheWeek(IncDay(StartOfTheMonth(incMonth(now)),-1));

← →
Семен Сорокин © (2004-02-19 16:42) [2]

DaysPerMonth

← →
CTAPbIi (2004-02-19 16:45) [3]

function LastDayOfMonth(dt: TDate): TDate;
var
d,m,y: word;
begin
DecodeDate(IncMonth(dt,1),y,m,d);
Result:=EncodeDate(y,m,1)-1;
end;

А help почитать?
//-----------------------------------------------------
DateUtils

Category

date/time routines

function EndOfAMonth(const AYear, AMonth: Word): TDateTime;

Последний день месяца Найти похожие ветки