RSS订阅 | 匿名投稿
您的位置:网站首页 > 时间 > 正文

delphi获取星期函数

作者:admin 来源:未知 日期:2010/4/28 23:13:11 人气: 标签:

delphi获取星期函数

function GetWeek: string;
var
mytime:SYSTEMTIME;
begin
GetLocalTime(mytime);
case mytime.wDayOfWeek of
0: Result:='星期日';
1: Result:='星期一';
2: Result:='星期二';
3: Result:='星期三';
4: Result:='星期四';
5: Result:='星期五';
6: Result:='星期六';
end;
end;


读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址: