求助:系统时间实时显示　

angelgy88050 发布于 2010-11-03 17:08， 869 次点击

　已有定时器Timer1，希望运行程序后，弹出的显示画面上显示系统时间。　　
　请问如何写出最简的程序。
　晚辈DELPHI上路不久，许多控件不太熟悉。

1 回复

yuutian2010-11-04 10:49

procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Caption:='日期时间：'+ formatdatetime('yyyy-mm-dd hh:mm:ss.zzz',now);
end;