problemas con datetime

[delphi.com.ar]

Si esa fecha la tienes un un TDateTime, simplemente le tienes que sumar dos enteros.

Código Delphi [-]
var
  AFecha: TDateTime;
begin
  {Convierte la cadena a un TDateTime
    Suponiendo que el formato es válido }
  AFecha := StrToDate('23/07/2005');

  {Realiza la operación aritmética}
  AFecha := AFecha + 2;

  {Convierte la fecha a un string y la mustra}
  ShowMessage(DateToStr(AFecha)); 
end;

Saludos!