摘要： Day 开头的函数使用单元： uses DateUtils●function DateOf(const AValue: TDateTime): TDateTime; 描述： 使用 DateOf 函数用来把一个 TDateTime 类型的变量转变成一个只带有日期的 TDateTime 类型变量。 例如： showmessage(DateTimetostr(dateof(now()))); 你得到的是 2003/03/19 而 showmessage(DateTimetostr((now()))); 得到的是 2003/03/19 10:50:49●function DateTimeToStr(D 阅读全文