Hola buenas gracias por tu respuesta modifique un poco tu codigo la verdad que barbaro van cambiando los meses pero el proble es que estoy trabajando con un componente DateTimePicker de acuerdo el meses que se seleccione en ese componentes se tiene que ir sumando los meses, esto es mas nada para una cobranza de cuotas el dias es el mismo pero solo tiene que ir cambiando los meses.
lo modifique algo asi pero necesito trabajar con el DateTimePicker y el StringGrid
Código Delphi
[-]var
C: Integer;
i : Integer;
begin
for i := 1 to 5 do
begin
StringGrid1.Cells [0, i ] := intToStr(i);
end;
for C := 1 to 5 do
begin
StringGrid1.Cells [1, C ] := DateToStr(EncodeDate(2022, C, 01));
end