Mudar o Ano de uma data

Delphi

05/12/2003

Como eu faço para mudar o ano de uma data que está em uma variavel do tipo TDate? Assim de 01/01/2002 para 01/01/2003 e assim sucessivamente.


Obrigado


Havilux

Havilux

Curtidas 0

Respostas

Thiago Vidal

Thiago Vidal

05/12/2003

Voce pode declarar DateUtils na cláusulas uses da sua Unit.

DataNova := IncYear(DataAntiga, Anos)


onde Anos é uma variavel do tipo Integer que pode ser negativa.


GOSTEI 0
Nigro

Nigro

05/12/2003

Apenas para completar a dica do amigo Thiago
DataNova := IncMonth(DataAntiga, 12)


GOSTEI 0
POSTAR