假設有輸入兩個 TDateTime 變數 ( Start, End)

ex: start 為 2006/01/01
end 為 2007/01/01

請問是否有函式可以列出中間經過的日期

Output:
2006/01/01
2006/01/02
2006/01/03
...
...
2007/01/01

我知道可以用
DecodeDate(Start->DateTime, StartYear, StartMonth, StartDay);
的方式取出 Year, Month, Day。
但是卻不曉得有什麼方法可以一天一天的增加
有想過 StartDay =1 來累加，但是又需要考慮 Month 可能有28,30,31天數不同，
每4年又會潤2/29，
不曉得有什麼解決的方法，還是說只能自己來計算...


請問是否有人能給我一點意見....謝謝

編輯記錄

沒錯, 可以用 start+=1 來做, 而不是 StartDay

編輯記錄

#include < DateUtils.hpp >

//裡面有很多日期演算的VCL函數，可以開啟BCB線上說明來查看一下～
extern PACKAGE System::TDateTime __fastcall IncDay(const System::TDateTime AValue, constint ANumberOfDays = 0x1);

編輯記錄

直接用StartDay =1就行了，你不用担心每个月的天数不同以及闰年等问题。加之前判断有没有到达EndDay就OK了

------
------------------------
博采眾家之長,奉獻綿薄之力
------------------------

感謝各位的幫忙，沒想到其實 TDateTime 可以直接拿來作比較。
可以利用類似以下程式碼來做...

while ( StartDate != EndDate ){
sprintf(msg, "%s", StartDate.DateString());
Memo1->Lines->Add(msg);
StartDate =1;
}

謝謝大家的意見..

在BCB裡對 "TDateTime" 按滑鼠右鍵 "Find Declaration"，

class RTL_DELPHIRETURN TDateTimeBase
{
public:
doubleVal;
};

其實 TDataTime 就是一個 double 的值，
按 [F1] 查看 TDateTime 的說明也可以看到，
"The integral part of a TDateTime value is the number of days that have passed since 12/30/1899. The fractional part of a TDateTime value is the time of day."
整數部分是由 1899/12/30 開始算的 "天數" - 日期，
小數部分則是 - 時間，
所以對 TDateTime 1 就是日期加一天，
要加一個小時則是 TDateTime double( 1.0 / 24.0 )，
加一個分鐘則是 TDateTime double( 1.0 / 24.0 / 60.0 ) ..... 依此類推，
有這些觀念，對於 TDateTime 時間的計算會有幫助的。

------
我..........還很嫩!