2Pascal-新时代的Pascal

 找回密码
 立即注册
搜索
热搜: fastreport
查看: 1650|回复: 0
打印 上一主题 下一主题

求utc时间

[复制链接]

29

主题

73

帖子

727

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
727
跳转到指定楼层
楼主
发表于 2016-9-24 21:44:58 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
京东购书支持本站
引用DateUtils单元


[mw_shl_code=delphi,true]var

ct:TdateTime;

begin
ct:=now();
label1.Text:=datetimetostr( TTimeZone.Local.ToUniversalTime(ct));
showmessage(inttostr(DayOfWeek(ct)));
end;
[/mw_shl_code]

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|新时代Pascal论坛

GMT+8, 2024-12-22 17:03 , Processed in 0.061303 second(s), 25 queries .

Powered by Discuz! X3

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表