[[Lepe]]

¿con paciencia?

Ya En serio, usa un bucle:

Código Delphi [-]
var i:Integer;
begin
  sg.Row:=0;
  for i:=0 to sg.ColCount -1 do
    sg.Cols[i].Add(Formatdatetime('dd/mm/yy', 
                                                          RecodeDate(date,2005,1,1)+i));
end;

Saludos