Ver Mensaje Individual
  #1  
Antiguo 24-03-2013
camiz camiz is offline
Miembro
 
Registrado: ene 2012
Posts: 69
Reputación: 13
camiz Va por buen camino
incrementar meses a partir de una fecha

hola amigos nuevamente por aqui buscando ayuda...
tengo un problemita relacionado con fechas por solucionar.. aqui el problema...

lo que quiero es incrementar fechas a partir de una... ejm

23/03/2013 ---- incrementar a partir de esta fecha por 6-------- y el resultado quiero que se vea asi

23/04/2013
23/05/2013
23/06/2013
23/07/2013
23/08/2013
23/09/2013

y todo esto quiero mostrarlo en un TStringGrid

estoy intentando con este codigo pero no me sale....


Código Delphi [-]
var f, filas :integer;
begin
Colocamos total de filas}
   f :=  6;
  StringGrid1.RowCount := f + 1;
  for filas :=1 to f do
  mostrador.cells[0,filas] := floattostr(roundto(filas, -2));
Mostramos fechas}
 for filas := 1 to f do
 StringGrid1.cells[1,filas] := DateTostr(roundto(IncMonth(23/03/2013, 1), -2);
end;


aver si alguien tiene la solucion.. Gracias...

Última edición por camiz fecha: 24-03-2013 a las 04:21:29.
Responder Con Cita