2020年1月17日
获取系统当前日期时间
摘要： procedure TForm1.Button1Click(Sender: TObject); begin Label1.Caption := FormatDateTime('hh:nn:ss',Now()); Label2.Caption := DateTimeToStr(Date()); Lab 阅读全文
posted @ 2020-01-17 14:24 DonVin 阅读(240) 评论(0) 推荐(0) 编辑