本文整理自网络,侵删。
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;
相关阅读 >>
Delphi xe7的android应用设定wifi的有效无效
Delphi如何获取一个字符串再另一个字符串中最后一次出现的位置
更多相关阅读请进入《Delphi》频道 >>