すごくよく忘れるので自分用のメモ。
uses に System.DateUtils を追加。
最終日を求めたい月の適当な日でTDateTimeを生成、EndOfTheMonthで最終日の時間を求める。(下記では1日で作っている)
var
d : TDateTime;
begin
d := StrToDateTime(editYear.Text + '/' + editMonth.Text + '/01');
d := EndOfTheMonth(d);
ShowMessage(FormatDateTime('yyyy/mm/dd', d));
end;XE3で確認。


