antigüedad Fechas

[atrus]

Hola, necesito que de una fecha saber si és por ejemplo tiene mas de 10 años de antigüedad pero no se me ocurre como hacerlo, alguna idea.
Gracias.

[*Caro*]

Hola atrus, puedes utilizar la función YearsBetween de la unit DateUtils.

Código Delphi [-]
var
 CantAnios : Integer;
begin
 CantAnios := YearsBetween(Now, Fecha);

 if CantAnios>10 then
  .....................

Saluditos

[AndyLupa]

Empezado por atrus

Hola, necesito que de una fecha saber si és por ejemplo tiene mas de 10 años de antigüedad pero no se me ocurre como hacerlo, alguna idea.
Gracias.

Código Delphi [-]
if Fecha < (Date-3650) then 
  //Es menos a 10 años

otro

Código Delphi [-]
if year(fecha)<(year(date)-10)
 //Es menos a 10 años

[ecfisa]

Hola atrus.

Para usar las funciones para manejo de fechas y horas tenes que incluir a la unidad DateUtils donde hay todo un arsenal de ellas. (revisa la ayuda de Delphi)

Andy, te hago una observación sobre la segunda forma de obtener la diferencia. Aunque la evaluación es correcta, la función para extraer el año es YearOf

Saludos.