Delphi TDateTime与Double的区别

//相关函数:
SysUtils.FloatToDateTime();
SysUtils.TryFloatToDateTime();

在 System 单元定义有: TDateTime = type Double;

看来 TDateTime 是一个 8 字节 64 位数据, 不过是 Double 的别名.

{测试: TDateTime 就是一个 Double}
var
t: TDateTime;
d: Double;
s: string;
begin
t := EncodeDateTime(2009, 5, 22, 11, 22, 33, 999);

{强制转换}
d := Double(t);
ShowMessage(FloatToStr(d)); //39955.4740046181

{隐式转换}
d := t;
ShowMessage(FloatToStr(d)); //39955.4740046181

{不必转换}
ShowMessage(FloatToStr(t)); //39955.4740046181

{直接把一个 Double 当作 TDateTime 看待}
s := FormatDateTime(‘yyyy-m-d hⓂ️s:z’, 39955.4740046181);
ShowMessage(s); //2009-5-22 11:22:33:999
end;

不会是任何一个 Double 都会转换成一个合法的时间, SysUtils 单元给出了最小与最大时间的常数:
const