delphi7里做会走的时钟,怎样做

发布网友发布时间：2022-06-15 09:07

共2个回答

热心网友时间：2023-11-15 07:25

加一个TIMER控件，时间间隔为一秒。然后每秒读一次系统时间。
如
TEXT1.TEXT:=TIMETOSTR(TIME);
TEXT2.TEXT:=DATEOSTR(DATE);

热心网友时间：2023-11-15 07:25

给你写个bcb的例子希望你能写出对应的delphi版，数字式很简单定时器+TDateTime类的相关函数会用就OK了

指针式的要玩TCanvas 绘图 ........

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com