void __fastcall TForm1::Button1Click(TObject *Sender)
{
   TDateTime sdd;   // 테이트타입 선언
   sdd = Now();     // 현제 시스템 일자 설정
   sdd = sdd + 100; // 100일을 더해준다 여기서 100은 일(Day)만 가능합니다
   ShowMessage(sdd); // 화면에 일자보기
}