首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

在线急用啊多谢各位达人

2012-02-23 
在线急用啊,谢谢各位达人知道一个日期比如2007-7-31,怎么解析成它是全年第几个月,星期几,第几个季度啊,全

在线急用啊,谢谢各位达人
知道一个日期比如2007-7-31,怎么解析成它是全年第几个月,星期几,第几个季度啊,全年的第几个周,下半年的第几个周,这个季度的第几个周,这个月的第几个周,下半年的第几个季度。各位达人知道多少告诉小弟多少,小弟在此不胜感激

[解决办法]
//星期几
function GetWeek: string;
var
mytime:_SYSTEMTIME;
begin
GetLocalTime(t);
case mytime.wDayOfWeek of
0: Result:= '星期日 ';
1: Result:= '星期一 ';
2: Result:= '星期二 ';
3: Result:= '星期三 ';
4: Result:= '星期四 ';
5: Result:= '星期五 ';
6: Result:= '星期六 ';
end;
end;
//一年第几周
ShowMessage(IntToStr(WeekOfTheYear(Now)));
//一年第几月
ShowMessage(IntToStr(MonthOfTheYear(Now)));
//季度根据月份自己算,其它的都可以算出来

热点排行