Suma de fechas en un For con un DateTimePicker(los días son inconstantes)

[Edwardfeliz]

Saludos a todos, no se si escribi el titulo correctamente pero aqui va mi caso:

tengo un For que agrega una secuencia de fechas a un String Grid, utilizando un DTP hago lo siguiente:

Código Delphi [-]
For  Lineas := 1 to cuotas  +1  do
  Begin
  dtp.Date := dtp.date +30;
  Cuadro.Cells[0,Lineas] := InttoStr(Lineas);
  Cuadro.Cells[1,Lineas] := FormatDateTime('dd/mm/yyyy', dtp1.Date);
End;

(Solo anexe parte del código donde creo que es lo relevante)
Fecha de Hoy 14/08/2017
Pero el resultado que me aparece es:
13/09/2017
13/10/2017
12/11/2017
12/11/2017
Etc

que resultado espero?
14/09/2017
14/10/2017
14/11/2017

y fuera mucho mejor si me sumara otro dia porque la idea es que sea una fecha de vencimiento de la cuota.

Espero haberme explicado bien.
Gracias de antemano.

[[AgustinOrtu]]

Existen funciones en la unidad System.DateUtils para trabajar con fechas, que te permiten sumar dias/meses/años. Por ej: IncDay

[Edwardfeliz]

Empezado por AgustinOrtu

Existen funciones en la unidad System.DateUtils para trabajar con fechas, que te permiten sumar dias/meses/años. Por ej: IncDay

Me da el mismo problema...

[[AgustinOrtu]]

Es mejor que postees el codigo. Parece que lo que buscas es incrementar de a un mes. Yo diria que utilices la funcion IncMonth

[Edwardfeliz]

Empezado por AgustinOrtu

Es mejor que postees el codigo. Parece que lo que buscas es incrementar de a un mes. Yo diria que utilices la funcion IncMonth

Con la función IncMonth resultó, Gracias...

Que raro que Casimiro no apareció, siempre esta casando novatos

[Casimiro Noteví]

Empezado por Edwardfeliz

Que raro que Casimiro no apareció, siempre esta casando novatos

¿Has hecho algo mal que yo no haya visto?

Además, yo no me dedico a "casar" a nadie

[roman]

Empezado por Edwardfeliz

Que raro que Casimiro no apareció, siempre esta casando novatos

Sí. Aquí en el cuartel le llamamos "el Celestino".

LineComment Saludos