如何将日期加一天（包括正负）(100分)

F

fanhongwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-05

• #1

请教如何对日期进行操作（包括加减，比较）

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-05

• #2

var
DateTime : TDateTime;
begin
DateTime := now;
DateTime := DateTime + 1;//DateTime := DateTime - 1;
end;

 

F

fanhongwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-05

• #3

谢谢，你的回答