Ver Mensaje Individual
  #2  
Antiguo 31-08-2005
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Reputación: 27
delphi.com.ar Va por buen camino
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!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita