delphi yyyy-mm-dd hh:mm:ss与秒数如何互换

yzydyh888 2013-07-16 06:08:35
如题:在delphi 中yyyy-mm-dd hh:mm:ss与秒数如何互换以1970.1.1 0:0:0为起始时间
急求
...全文
130 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
sololie 2013-07-18
LS的这个是求毫秒的,要用就用SecondsBetween。 不过如果没有更多时间计算需求的话没必要再额外引入DateUtils个单元,加大编译后文件的大小
回复
jayqiang 2013-07-18
DateUtils.MilliSecondsBetween(vDateTime1,vDateTime2);
回复
lyhoo163 2013-07-17
引用
var sDt, eDt: TDateTime; d: Extended; begin sDt := StrToDateTime('1970-01-01 00:00:00'); eDt := Now; d := (eDt - sDt) * 24 * 60 * 60; ShowMessage(FloatToStr(d));// 得到1970-01-01 00:00:00 至今的秒数,自己四舍五入下
支持正解。
回复
sololie 2013-07-16

var
  sDt, eDt: TDateTime;
  d: Extended;
begin
  sDt := StrToDateTime('1970-01-01 00:00:00');
  eDt := Now;
  d := (eDt - sDt) * 24 * 60 * 60;
  ShowMessage(FloatToStr(d));// 得到1970-01-01 00:00:00 至今的秒数,自己四舍五入下
回复
相关推荐
发帖
Delphi
创建于2007-08-02

4923

社区成员

Delphi 开发及应用
申请成为版主
帖子事件
创建了帖子
2013-07-16 06:08
社区公告
暂无公告