sumar 180 dias a partiendo de una columna de un grid

[elaprendizprog]

hola a todo tengo una fecha la cual es puesta en un grid por el usuario, Ahora bien en el form tengo tambien 2 chekbox la cual uno indica 180 dias y el otro 90 dias. quiero que en una columna del grid me aparezca la suma automatica de esta fecha, ejemplo

fecha inical puesta por el usuario 01/01/2008
fecha calculada automaticamnte en grid debe se fechai+180 o 90 dependiendo del chekbox selecionado

de igual forma quiero que la mascara de una columna en un grig sea: __/__/___ (formato Fecha)

[look]

para lo del edit podes utilizar el Maskedit de la paleta adicional de los componentes , y para lo de sumarles los dias proba con Incday()...

saludos....

[[escafandra]]

Pues la forma de sumar días a una fecha mas fácil e intuitiva es utilizar el operador suma:

TDate D = fecha + 180;

Saludos.

[M@R!N@]

Hola Que Tal!! Bueno, para la suma de fechas es algo así:

//Como tu dices en un StringGrid, digamos que la fecha está en la primera
//columna y quiero poner la suma de fechas en la segunda...

StringGrid1->Cells[1][0]=StrToDate(StringGrid1->Cells[0][0])+190;


//Basta con convertir a datos tu cadena y sumarlo normal, veras que sale la
//suma de fechas sin problemas

Espero que te haya servido ^_^ hasta luego y suerte!

Por cierto, no estoy segura si se puede poner máscaras en los grids, pero para introducir tus datos como dijo look puedes utilizar un MaskEdit o el CCalendar, que te permiten tener tus datos así como quieres en ese formato....

[Neftali [Germán.Estévez]]

En la Unit StrUtils si no recuerdo mal hay una funcon llamada IncDays, que le pasas una fecha y el número de días a sumar y te devuelve a la nueva fecha.

Código Delphi [-]
  d1 := IncDay(Now(), 160);

[[Lepe]]

.. y en la unidad DateUtils, también tienes algunas más.

Saludos

[Neftali [Germán.Estévez]]

Empezado por Neftali

En la Unit StrUtils si no recuerdo mal...

Empezado por Lepe

.. y en la unidad DateUtils

DateUtils, DateUtils,....
Esa quería decir...

Gracias Lepe.

[elaprendizprog]

Muchas gracias a todo por la ayuda.
Sin embargo es necesito un poquito mas de ayuda de su parte con el codigo completo y en cuanto a:
StringDBGrid1->Cells[2][0]=StrToDate(StringGrid1->Cells[0][0])+190; lo que esta en negrito y en subrayado me da problema y en cuanto a la otra funciones no se donde ponerla y tambien puedo ver que tiene una variante que no se donde declararla.

envio sentencia:
procedure TFormAAD.DBGrid1ColExit(Sender: TObject);
begin
StringDBGrid1->Cells[2][0]=StrToDate(StringGrid1->Cells[0][0])+190;
END;
end.

[M@R!N@]

Oye pero entonces no estás programando en c++ aunque de todas maneras no creo que sea gran problema, solo basta acomodarlo...

Hem... así me quedó en delphi espero que te funcione, a mi si me funcionó:

StringGrid1.Cells[1,0]:=DateToStr(StrToDate(StringGrid1.Cells[0,0])+190)

//StringGrid1 pues es el nombre de mi grid
//Solo convertí lo que tenía dentro a tipo fecha, le sumé la cantidad de tiempo que quiero y al final lo volví a convertir en cadena
//Espero que te sirva, suerte!!

[[escafandra]]

Bueno, a lo mejor si programa C tratando de adaptar algún código....

StringGrid1->Cells->Cells[2][0]=StrToDate(StringGrid1->Cells->Cells[0][0])+190;

Saludos.

[elaprendizprog]

Perfecto esto si me sirve efectivamente estoy programnando en delphi 2005, Mucha gracias