Ver Mensaje Individual
  #3  
Antiguo 24-05-2007
Avatar de juanlaplata
juanlaplata juanlaplata is offline
Miembro
 
Registrado: ene 2007
Ubicación: La Plata, Bs. As. (Argentina)
Posts: 212
Reputación: 18
juanlaplata Va por buen camino
Código Delphi [-]
uses  DateUtils ;
var    dia,mes,ano: Word;
begin
   dia:= DayOf(fecha);
   mes:= MonthOf(fecha);
   anio:= yearOf(fecha.Text);
   incAMonth(anio,mes,dia,1);
El 1 indica que aumeta dicha fecha en un mes, asi tambien
incADay(anio,mes,dia,1);
incAYear(anio,mes,dia,1);
Saludos, espero te sirva.
Responder Con Cita