月末日

Delphiである月の初日、月末日を求める方法です。 以前にもこのブログで書いたことがありますが、以前の記事では翌月の求め方が書いてありませんでした。

翌月の1日を代入し、そこから1日引くことで作成できる。 var LastDay : TDate; begin LastDay := StrToDate(‘201...