本文整理自网络,侵删。
if Pos('星期',FormatDateTime('ddd',Now))=0 then Caption := FormatDateTime('yyyy年mm月dd日',Now)+'星期'+FormatDateTime('ddd',Now);
相关阅读 >>
更多相关阅读请进入《Delphi》频道 >>
本文整理自网络,侵删。
if Pos('星期',FormatDateTime('ddd',Now))=0 then Caption := FormatDateTime('yyyy年mm月dd日',Now)+'星期'+FormatDateTime('ddd',Now);
相关阅读 >>
更多相关阅读请进入《Delphi》频道 >>
管理员已关闭评论功能...
暂无评论...