你只要在ontimer事件中调用now并显示即可
别忘了加上Application.ProcessMessages
这样就该没问题了

解决方案 »

  1.   

    用Timmer控件,在Timmer事件里写代码,还有application.procesmessages
      

  2.   

    可以在timer时间中输入
      label1.caption:=timetostr(time);
      application.processmessage;
    这样就可以了
    试试吧!
      

  3.   

    线程可以
    timer中也可以解决的
    主要记得application.processmessage
      

  4.   

    用一定时器(Ttimer)在他的ontimer事件中写入如下代码:
    label1.caption:=timetostr(time);OK! 搞定他。
      

  5.   

    自已定制一个复合组件
    在构造函数中人创建TTime对象
    实时显示即可.