Use IncMonth, segue exemplo:
procedure TForm1.Button1Click(Sender: TObject);
var
x : tdatetime;
begin
x := date;
x := IncMonth(x, 13);
showmessage(datetostr(x));
end;
Luciano Calenzani Simões
----- Mensagem original ----
De: Antonio Mateus <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 15 de Agosto de 2008 8:18:48
Assunto: [delphi-br] Calculo de datas
Olá pessoal, sou iniciante no mundo Delphi e estou com o seguinte problema,
eu tenho uma data inicial e o numero de meses e preciso que o sistema
calcule e me mostre a data final a partir dessas 2 informações ja tentei no
google mas sempre encontro calculos entre 2 datas mas nesse caso eh uma data
e o numero de meses para mostrar a data final desse calculo, se alguem puder
me ajudar eu ficarei muito agradecido !
Obrigado.
--
Antonio Mateus
Estudante de Sistemas de Informação
Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses
[As partes desta mensagem que não continham texto foram removidas]
