Delphi - Calcular vencimiento

 
Vista:
sin imagen de perfil

Calcular vencimiento

Publicado por Dario (29 intervenciones) el 09/10/2010 07:02:22
Tengo 2 TDateTimePicker y un TEdit: En el primer TDateTimePicker pongo la fecha de inicio de un credito ej. 10/10/2010; en el Edit escribo el num 3 que se refiere a la cantidad de cuotas. Tomando la fecha anterior y la cantidad de cuotas, el credito venceria el 10/01/2011. Como hago para que el segundo TDateTimePicker actualice automaticamente la fecha de la ultima cuota (10/01/2011).
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Calcular vencimiento

Publicado por Eva (484 intervenciones) el 12/10/2010 22:48:24
Extrae el día,mes y año del primer DateTimePicker (con DecodeDate)
Al número de mes sumale el número del Edit y tendrás el número del nuevo mes. Aquí tendrás que poner un condicional para cuando pase de 12 que vuelve a inicar el 1 y hay cambi de año (trabajatelo)
Monta la nueva fecha con el mismo día, el mes resultante y el año resultante (con EncodeDate)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar