那里出错了(日期函数问题)(28)

人

人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-14

• #1

edit1.Text := inttostr(DaysBetween(2010-1-1,2010-2-28))为什么得到的结果是28应该相隔不止28天的,想知道是那里出了错

 

人

人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-14

• #2

function DaysBetween(const ANow, AThen: TDateTime): Integer;

 

人

人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-14

• #3

edit1.Text := inttostr(DaysBetween(2010-1-1,2010-2-28))为什么得到的结果是28应该相隔不止28天的,想知道是那里出了错

 

L

liyinwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-14

• #4

Edit1.Text := IntToStr(DaysBetween(StrToDateTime('2010-1-1'), StrToDateTime('2010-2-28')));

 

人

人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-14

• #5

接受答案了.