怎样更新delphi中的时间

来源:百度知道 编辑:UC知道 时间:2024/05/27 13:11:03
Sb.Panels[3].Text:=ForMatDateTime(' yyyy-mm-dd',now())+ForMatDateTime(' H:M:S',now());
结果时间只是登陆那一刻的时间,不能自动更新,怎样才能自动更新秒呢?

确实需要加入Timer控件,不过上面的写法是错误的,程式运行时就需要设置Timer的Enabel为True.
你在Timer的OnTimer事件中写下你的赋值语句,设置Interval为1000(1秒)就可以了:
Procedure Form1.TimerOnTimer....
begin
Sb.Panels[3].Text:=ForMatDateTime(' yyyy-mm-dd,now())+ForMatDateTime(' H:M:S',now());
end;

用定时器控件Timer,时间间隔Interval小于1秒(<1000,系统这里的单位是毫秒),在OnTimer事件中加入这段代码。
还可以通过
Timer.Enabled:= True/False;
来激活/停止定时器

别把楼主当傻瓜,具体怎么写这些他肯定知道的。
interval为1000,理论上是对的,但实际运行有点误差.
我说的激活和停止只是给楼主一个补充的参考,而不是说一定要照这样做。况且控件自动默认的就是Timer的Enabled为True,根本就不用你设。
别在这里扯能了
另外,请教你的这个“Enabel”是什么?