代码如下(示例):
//---------------------------------------------------------------------------
void __fastcall TForm1::Label1Click(TObject *Sender)
{
TDate tomorrow = IncDay(Now()); //计算明天的日期 IncDay 返回增加天数的日期。
this->Label1->Caption = tomorrow.FormatString("yyyy/mm/dd");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Label2Click(TObject *Sender)
{
TDate dayAfterNext = IncDay(Now(), 2);//计算后天的日期,注意参数为2.
this->Label2->Caption = dayAfterNext.FormatString("yyyy/mm/dd");
}
2.计算月
代码如下(示例):
//---------------------------------------------------------------------------
void __fastcall TForm1::Label3Click(TObject *Sender)
{
TDate nextMonth = IncMonth(Now()); //IncMonth 返回月数递增的日期。
this->Label3->Caption = nextMonth.FormatString("yyyy/mm/dd");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Label4Click(TObject *Sender)
{
TDate monthAfterNext = IncMonth(Now(), 2);
this->Label4->Caption = monthAfterNext.FormatString("yyyy/mm/dd");
}
2.计算年
代码如下(示例):
//---------------------------------------------------------------------------
void __fastcall TForm1::Label5Click(TObject *Sender)
{
TDate nextYear = IncYear(Now()); //IncYear 返回递增年数的日期,第二年。
this->Label5->Caption = nextYear.FormatString("yyyy/mm/dd");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Label6Click(TObject *Sender)
{
TDate yearNextAfter = IncYear(Now(), 2);//第三年
this->Label6->Caption = yearNextAfter.FormatString("yyyy/mm/dd");
}



