期間内の月数を取得 (ID:12076)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 D6 では uses DateUtils; procedure TForm1.Button1Click(Sender: TObject); begin Label1.Caption := IntToStr(Round(MonthSpan(VarToDateTime('2003/12'),VarToDateTime('2004/11')))); end; D5 では MonthSpan が使えますか？