Depende. Se vc quer apenas subtrair uma quantidade de anos apartir de
uma data.
function DecYear(pData : TDateTime; pQtdYear : Integer = 1) : TDateTime;
var
Year,
Month,
Day: Word;
begin
DecodeDate(pData, Year, Month, Day);
Year := Year - pQtdYear;
Result := EncodeDate(Year, Month, Day);
end;
Caso vc queira a quantidade exata de dias ai vc tera q calcular a
quantidade de dias ( por q temos anos com 365 e 366 dias ) por ano e
depois subtrair da data original.
Eduardo
leandrorodrigodossantos escreveu:
Bom dia Galera
Eu tenho um pequeno probleminha
Queri converter um numero de anos em um a data alguem sabe como fazer
isso??
Tipo eu tenho la 14 anos e queria saber a qual data isso equivale,
alguem poderia me ajudar
Agradeço desde ja.
Leandro
___
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular.
Registre seu aparelho agora!
http://br.mobile.yahoo.com/mailalertas/
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
