TDateTime = type Double ; 即是一个双精度浮点
   现在知道怎么存储了吧