2017年5月15日
摘要: var Date: TDateTime; FormatSettings: TFormatSettings; begin Date := Now;//获取当天时间 ShowMessage(DateToStr(Date)); //当天时间 2017-05-15 (输入的日期格式以系统的时间格式为准,我系 阅读全文
posted @ 2017-05-15 09:31 King Kwong 阅读(1636) 评论(0) 推荐(0) 编辑