Kalender, Formel

[Bjoerk]

Delphi-Quellcode:

var
  Date: TDateTime;
begin
  Date := StrToDate('13.10.2014');

  Date := IncDay(Date, 2);
  Showmessage(DateToStr(Date));

  Date := IncDay(Date, -2);
  Showmessage(DateToStr(Date));
end;