delphi获取星期函数


本文整理自网络,侵删。

 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 fmx 获取控件句柄

Delphi richedit的实现msn / qq 中的动画表情

Delphi调用程序版本信息的方法

Delphi 字母大小写转换

Delphi 打开win8及以上操作系统的系统已安装程序目录

Delphi写com+的心得体会

Delphi nethttpclient post 函数

Delphi 读取文件获取指定字符串

Delphi一个简单的穿墙下载者

Delphi windows 编程[9] - wm_close 消息

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...