日期類型:
TDateTime
字符串到日期類型的轉(zhuǎn)換:
StrToDate
兩個(gè)全局變量:
ShortDateFormat = "yyyymmdd";
DateSeparator = '-';
用來(lái)定義StrToDate函數(shù)的格式
代碼
TDateTime dt,dt2,dt3;
unsigned short year,month,day;
//由于分隔符沒(méi)法為空,只能這樣了
tmpDate= tmpDate.SubString(1,4) + "-" + tmpDate.SubString(5,2) + "-" + tmpDate.SubString(7,2);
dt =StrToDate(tmpDate);
// ShowMessage(DateToStr(dt));
//取下月的第一天
dt2=dt+20;//保證d2在下個(gè)月
dt2.DecodeDate(&year,&month,&day);//取年月日
dt3=AnsiString(year)+"-"+AnsiString(month)+"-1";//下個(gè)月的第一天
//ShowMessage(dt3.FormatString("yyyymmdd"));
tmpDyrq =dt3.FormatString("yyyymmdd");
TDateTime
字符串到日期類型的轉(zhuǎn)換:
StrToDate
兩個(gè)全局變量:
ShortDateFormat = "yyyymmdd";
DateSeparator = '-';
用來(lái)定義StrToDate函數(shù)的格式
代碼
TDateTime dt,dt2,dt3;
unsigned short year,month,day;
//由于分隔符沒(méi)法為空,只能這樣了
tmpDate= tmpDate.SubString(1,4) + "-" + tmpDate.SubString(5,2) + "-" + tmpDate.SubString(7,2);
dt =StrToDate(tmpDate);
// ShowMessage(DateToStr(dt));
//取下月的第一天
dt2=dt+20;//保證d2在下個(gè)月
dt2.DecodeDate(&year,&month,&day);//取年月日
dt3=AnsiString(year)+"-"+AnsiString(month)+"-1";//下個(gè)月的第一天
//ShowMessage(dt3.FormatString("yyyymmdd"));
tmpDyrq =dt3.FormatString("yyyymmdd");