Add a week to a date...

[PaidtheUmpire]

I want to get the date a week from today... any ideas how...

What i got so far...

var CurrentDate, WeekFromNow : tDateTime
begin

CurrentDate := now();
WeekFromNow := CurrentDate +7;

end;

 

[whosrdaddy]

in Delphi7 :

weekfromnow:=Incday(now,7);

cheers,

http://www.damovo.com

 

[bbegley]

It seems like your code should work (although the IncDay() example is prettier). Are you trying to strip off the time value? In that case, you could use:

weekfromnow := Incday(Date,7);


or:

declare your variables as TDate instead of TDateTime.


Brian
"There are 2 kinds of people in the world, those that divide people into two groups and those that don't. I belong to the second group." - tag line I stole