下载后可任意编辑各种时间类型之间的转换函数 DateTimeToFileDate 函数：定义：DateTimeToFileDate(DateTime: TDateTime): Integer;作用： 将一个 TDateTime 类型的时间转化为 Dos 环境中的时间，Dos 环境下对时间的访问方法和 VCL 中的 TdateTime 类型不一样，在进行文件操作时，为了保持时间的一致性，需要使用 DateTimeToFileDate 函数进行转化，返回的 Integer 的值就是 Dos 下的用于描述时间的值。DateTimeToSystemTime 过程：定义：procedure DateTimeToSystemTime(DateTime: TDateTime; var SystemTime: TSystemTime);作用：将一个 TDateTime 类型的时间转换为 Win API 函数所使用的 TSystemTime 类型，在使用 WinApi 函数操纵时间时用到。SystemTimeToDateTime 函数：定义：function SystemTimeToDateTime(const SystemTime: TSystemTime): TDateTime;作用：将一个在 WinApi 函数中得到的 TSysTemTime 类型的数转换为 TDateTime 类型。DateTimeToTimeStamp 函数：TimeStampToDateTime 函数：定义：DateTimeToTimeStamp(DateTime: TDateTime): TTimeStamp; function TimeStampToDateTime(const TimeStamp: TTimeStamp): TDateTime;作用：用于在 TDataTime 类型与 TTimeStamp 之间进行互相转换。TDataTime 用一个 double 描绘一个时间，而 TTimeStamp 则是采纳两个整形数分别描述时间。两种类型的区别可参考文章开始处的数据类型描述部分。EncodeDate 函数：定义：function EncodeDate(Year, Month, Day: Word): TDateTime;作用： 输入年(year)，月(month)，日(day)的值，将该日期返回为 TDateTime 类型，年的范围为 1-9999,月份的范围为 1-12，日期的范围视当月的情况而定，假如输入的值超出范围，则将产生一个 EConvertError 错误。DecodeDate 过程：定义：procedure DecodeDate(Date: TDateTime; var Year, Month, Day: Word);作用：输入一个 TDateTime 类型的日期，将其转为年(Year)，月(Month),日(Day)的值。下载后可任意编辑假如输入值为 0 或小于 0，则年月日均为 0，EncodeTime 函数：定义：EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime;作用：输入小时(Hour),分(min),秒(Sec),微秒(MSec)的值，返回一个 TDateTime类型的时间，该值为一个介于 0 至 1 之间的小数。Hour 的取值范围为 0-23,Min 的取值范围为 0-59,...
