ド素人の質問です。 (ID:23207)

名前

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

本文 これでOKです。年は自動で変わります。 //次月 procedure TForm1.Button1Click(Sender: TObject); begin Calendar1.CalendarDate := IncMonth(Calendar1.CalendarDate,1); end; //前月 procedure TForm1.Button1Click(Sender: TObject); begin Calendar1.CalendarDate := IncMonth(Calendar1.CalendarDate,-11); end;