怎样方便的得到两个日期之间的所有日期？
我在窗体上加上了2个日期控件，开始和结束，选好开始和结束日期后，如何得到这两个日期之间的所有日期？
比如选了2012-03-08 到 2012-03-11
那么结果就是2012-03-08、2012-03-09、2012-03-10、2012-03-11。
还有就是跨月份的准确，不能2月30日。

谢谢！

[解决办法]

Delphi(Pascal) code

procedure TForm1.Button1Click(Sender: TObject);vard1,d2: TDateTime;begin  d1:=StrToDate('2012-02-25');  d2:=StrToDate('2012-03-05');  while (d1<d2)  do  begin    d1:=d1+1;    Memo1.Lines.Add(DateToStr(d1));  end;end;
[解决办法]
Delphi(Pascal) code
uses dateutils;var  i,dsys:integer;begin dsys:=DaysBetween(D1, D2); for i:=0 to dsys do    showmessage(DateToStr(D1+i));end;
[解决办法]
Delphi(Pascal) code
var  bt, et: TDate;begin  bt := StrToDate('2012-02-26');  et := StrToDate('2012-03-06');  repeat    Memo1.Lines.Add(DateToStr(bt));    bt := bt + 1;  until bt > et;end;
[解决办法]
楼 上 都 是 高 手 呀