Delphi 日期时间函数详解.docVIP

各种时间类型之间的转换函数 ?DateTimeToFileDate函数： 定义：DateTimeToFileDate(DateTime: TDateTime): Integer; 作用： 将一个TDateTime类型的时间转化为Dos环境中的时间，Dos环境下对时间的访问 方法和VCL中的TdateTime类型不一样，在进行文件操作时，为了保持时间的一致性，需 要使用DateTimeToFileDate函数进行转化，返回的Integer的值就是Dos下的用于描述时 间的值。 DateTimeToSystemTime 过程： 定义：procedure DateTimeToSystemTime(DateTime: TDateTime; var SystemTime: TS ystemTime); 作用：将一个TDateTime类型的时间转换为Win API函数所使用的TSystemTime类型，在使 用WinApi函数操纵时间时用到。 SystemTimeToDateTime 函数： 定义：function SystemTimeToDateTime(const SystemTime: TSystemTime): TDateTim e; 作用：将一个在WinApi函数中得到的TSysTemTime类型的数转换为TDateTime类型。 DateTimeToTimeStamp 函数： TimeStampToDateTime 函数： 定义：DateTimeToTimeStamp(DateTime: TDateTime): TTimeStamp; ? ? ? function TimeStampToDateTime(const TimeStamp: TTimeStamp): TDateTime; 作用：用于在TDataTime类型与TTimeStamp之间进行互相转换。TDataTime 用一个doubl e描绘一个时间，而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 ,Sec的取值范围为0-59,MSec的取值范围为0-999，如果输入值超出范围，则产生一个EC onvertError 错误。 DecodeTime 过程： 定义：procedure DecodeTime(Time: TDateTime; var Hour, Min, Sec, MSec: Word); ? 作用：输入一个时间，将其转换为小时(Hour),分(min),秒(Sec),微秒(MSec)的值。 TDateTime类型与字符串型转换函数： DateTimeToStr 函数： DateToStr 函数 TimeToStr函数 定义：function DateTimeToStr(DateTime: TDateTime): string; ? ? ? function TimeToStr(Time: TDateTime): string; function TimeToStr(Time: TDateTime): string; 作用：将一个TDateTime类型的数转换成字符串，DateTimeToStr转换日期和时间，Date ToStr只转换日期，TimeToStr只转换时间。转换后的输出效果为YYYY-M-D H：M：S StrToDateTime函数 StrToDate函数 StrToTime函数 定义：function StrToDateTime(const