哪边有像电子钟一样的显示时间的控件下？给60分！！！！！

谢谢

解决方案 »

  1.   

    自己写一个呀：在Form上放一个Timer控件，一个Label控件
    Timer的Interval属性为1000；Enabled属性为True在Timer1的OnTimer里写：
    procedure TForm1.Timer1Timer(Sender: TObject);
    begin
      Label1.Caption :=DateTimeToStr(Now);
    end;
      

  2.   

    TimeToStr(Time) + 图片截取 就可以实现 不用控件的!
    如果需要代码我可以给出!
      

  3.   

    自己写吧，我自己写了个圆形方式的表，有兴趣可email to hanshujiang@yahoo
    .com.cn