我设定好的时间减去系统时间等于剩下的时间。。
应该要怎么实现呢???
delphi(时间的问题)
答案:3 悬赏:80
解决时间 2021-03-21 05:38
- 提问者网友:娇妻失忆
- 2021-03-20 20:34
最佳答案
- 二级知识专家网友:伤口狠精致
- 2021-03-20 21:07
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都可以
全部回答
- 1楼网友:留下所有热言
- 2021-03-20 22:28
你可以用socket将要设的时间发给客户端的程序然后用setlocaltime设置本时间。
- 2楼网友:一池湖水
- 2021-03-20 21:15
你是想算两个时间之间的间隔吧 那么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函数
看你要算什么间隔了 通过这些函数的运用都可以取出
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯