首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

delphi 获取较系统时间并和指定的字符串时间进行比较,当指定时间小于等于系统时间时弹出提示框。该如何处理

2012-02-22 
delphi 获取较系统时间并和指定的字符串时间进行比较,当指定时间小于等于系统时间时弹出提示框。如:系统时

delphi 获取较系统时间并和指定的字符串时间进行比较,当指定时间小于等于系统时间时弹出提示框。
如:系统时间为“2007年7月10日   14:08:43”我设置的时间为   “2007年7月10日  

14:00:43”这时应弹出提示框。还有如何不用时钟控件在程序中自定义一个时钟来控

制比较,时钟可能会设置10分钟比较一次。我问的比较烦琐,谢谢耐心的朋友!^-^

[解决办法]
在程序中放一个timer设置它的Interval等于10*60*1000

例如 如果相差60秒 就提示
if SecondsBetween( Now,StrToDateTime( '2007-07-10 14:00:43 ' ) ) > 60 then
showmessage( ' ' );

热点排行