Tema: Edad!
Ver Mensaje Individual
  #2  
Antiguo 01-12-2011
Avatar de ElDioni
[ElDioni] ElDioni is offline
Miembro Premium
 
Registrado: jul 2005
Ubicación: Murcia (España)
Posts: 935
Reputación: 21
ElDioni Va por buen camino
Hola y_a_p,

creo que no has entendido lo que te proponía Caro, en la función
Código Delphi [-]
FechaInicio:=IncYear(FechaInicio, Anyos);
es lo siguiente:

A la FechaInicio (Caro la ha llamado así pero en realidad es la fecha de nacimiento del paciente) le está sumando los años resultantes después de hacer el YearsBetween y que hemos guardado en la variable Anyos.

Pongamos que la FechaInicio es 01/02/2008 y hoy es 01/03/2011 por lo tanto al hacer el YearsBetween tendremos guardado Anyos=3, luego a la fecha inicio le sumamos esos años por lo que tendríamos 01/02/2011, si ahora hacemos
Código Delphi [-]
Meses := MonthsBetween(FechaInicio, Now);
tendremos meses=1.

Espero que esto te haya despejado las dudas que tuvieras.

Saludos.
Responder Con Cita