
2013-04-22
展开全部
你是想算两个时间之间的间隔吧 那么delphi自带有函数的
调用 DateUtils 单元下的
YearSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的年间隔
MonthSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的月间隔
WeekSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的星期间隔
DaySpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的天间隔
HourSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的小时间隔
MinuteSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的分钟间隔
SecondSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的秒间隔
所有的返回值都是 Double类型的 如果需要把他转化为整型的 可调用Math单元下的Ceil函数
看你要算什么间隔了 通过这些函数的运用都可以取出
调用 DateUtils 单元下的
YearSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的年间隔
MonthSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的月间隔
WeekSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的星期间隔
DaySpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的天间隔
HourSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的小时间隔
MinuteSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的分钟间隔
SecondSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的秒间隔
所有的返回值都是 Double类型的 如果需要把他转化为整型的 可调用Math单元下的Ceil函数
看你要算什么间隔了 通过这些函数的运用都可以取出
展开全部
delphi里面时间类型可以直接加减运算的,所以你只要将两个时间相减就可以得到指定的值了
如果你是用DateTimePicker控件设定时间的话只需要DateTimePicker.time-now()就可以了
如果要显示出来则是这样
label1.Caption:=formatdatetime('hh:mm:ss',(DateTimePicker.time.Time-now()));
加减运算以后的数据类型还是时间类型,需要用formatdatetime函数或者datetimetostr函数转换成字符串类型然后显示在控件或者showmessage都可以
如果你是用DateTimePicker控件设定时间的话只需要DateTimePicker.time-now()就可以了
如果要显示出来则是这样
label1.Caption:=formatdatetime('hh:mm:ss',(DateTimePicker.time.Time-now()));
加减运算以后的数据类型还是时间类型,需要用formatdatetime函数或者datetimetostr函数转换成字符串类型然后显示在控件或者showmessage都可以
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-04-22
展开全部
没明白你的意思,系统时间是变化的,
如果是动态的,全部换算成秒 来计算。
再就是时分秒分开算,最后加到一起,
系统时间是 NOW
如果是动态的,全部换算成秒 来计算。
再就是时分秒分开算,最后加到一起,
系统时间是 NOW
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询