Delphi 获取星期几


本文整理自网络,侵删。

 
  if Pos('星期',FormatDateTime('ddd',Now))=0 then
   Caption := FormatDateTime('yyyy年mm月dd日',Now)+'星期'+FormatDateTime('ddd',Now);

相关阅读 >>

Delphi下载指定网址(url)的文件,带进度条显示

Delphi webbrowser 自动登录

Delphi 逐个分解后字符串加载到stringgrid1

Delphi kmp(字符串匹配)算法

Delphi 简单的旋转图像角度代码

Delphi xe 应用程序横竖屏设置

Delphi 过滤开头 结尾 全部 空格的函数

Delphi xe5 给edit增加自定义按钮

Delphi scrollbox1滚动框鼠标滚轮

Delphi 同时激活两个窗体

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



打赏

取消

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

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

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

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

评论

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

    暂无评论...