菜鸟问题,请各位多帮忙!!(0分)

  • 主题发起人 zhangshuze
  • 开始时间
Z

zhangshuze

Unregistered / Unconfirmed
GUEST, unregistred user!
我现在想让一个label的Caption等于当前的时间,时间在变,它也要变,如何处理??

请多帮忙!!
 
procedure Tform1.tmTimeTimer(Sender: TObject);
begin
label.caption:='Date:'+DaTeTostr(Date)+' Time:'+TimeTOStr(Time);
end;
 
可以给这个label定义成特殊类型(就是给这个label的内容改写成当前时间,
并且作个事件每次时间改变的时候刷新这个label),
或者直接使用time的标签就行了。
 
我现在就是这样做的,你请看代码?
procedure Tm_main.Timer1Timer(Sender: TObject);
begin
Label1.Caption:=datetimetostr(now);
end;

有哪里不对啊?
 
请教!!
 
time的标签是指的什么,别见笑,我是刚学delphi的
 

Similar threads

回复
0
查看
578
不得闲
回复
0
查看
859
不得闲
回复
0
查看
670
不得闲
D
回复
0
查看
762
DelphiTeacher的专栏
D
顶部