delphi裡datetime類型實際上就是double類型, 是以1899/12/30所對應的double的值為1 整數代表天數,小數部分代表秒數, 求兩個日期之間相差的秒數: (d2 - d1)*24*60*60