如何在statusbar中显示系统的时间,而且格式为2003/6/13 08:12:23

Question

如何在statusbar中显示系统的时间,而且格式为2003/6/13 08:12:23
最关键的是秒也能同系统时间 秒 同步
我试过datetimetostr(now),不行,因为秒不和系统时间 秒 同步!
我的如下
form1.StatusBar1.SimplePanel:=true;
form1.StatusBar1.SimpleText:=datetimetostr(now);
//显示结果2003/06/13 10:20:10 上午

Answer 1

用一个1秒中一次的timer，在ontimer事件中
form1.StatusBar1.SimplePanel:=true;
form1.StatusBar1.SimpleText:=datetimetostr(now);

Answer 2

同意楼上的，但是可以稍微改一点
form1.StatusBar1.SimpleText := ForMatDateTime(YYYY/mm/dd HH:MM:ss,now)

Answer 3

在补充一句
form1.StatusBar1.SimpleText := ForMatDateTime('YYYY/mm/dd HH:MM:ss',now);To STYun(天云) :
Right?

Answer 4

form1.StatusBar1.SimpleText := ForMatDateTime('YYYY/mm/dd HH:nn:ss',now);

Answer 5

楼上说的都不对。
应该这样：
form1.StatusBar1.SimpleText := ForMatDateTime('YYYY"/"mm"/"dd HH:nn:ss',now);