读书人

delphi 获取较系统时间并和指定的字符

发布时间: 2012-02-22 19:36:56 作者: rapoo

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( ' ' );

读书人网 >.NET

热点推荐