Somar 5 dias a uma determinada data

Question

Como fa�o para somar um determinado n�mero de dias a uma data. Por exemplo, digamos que eu tenha armazenado a data 11/09/04, eu quero que 5 dias depois o sistema me de um alerta, ou seja, no dia 16/09/04 quando eu entrar no sistema deve aparecer uma mensagem por exemplo.

Valeu!

Oscar Candido · Answer

Amigo, um exeplo simples, espero qeu seja isso que procure:

procedure TForm1.Button1Click(Sender: TObject);
begin
   ShowMessage(DateToStr(date + 5));
end;

Espero ter ajudado
Um Abra�o

Vispo · Answer

[quote:818915b504=�oscar candido�]Amigo, um exeplo simples, espero qeu seja isso que procure:

procedure TForm1.Button1Click(Sender: TObject);
begin
   ShowMessage(DateToStr(date + 5));
end;

Espero ter ajudado
Um Abra�o[/quote:818915b504]

Era isso mesmo oscar, obrigado.

Um abra�o!

Dpinho · Answer

[quote:321385eee9=�Vispo�]Como fa�o para somar um determinado n�mero de dias a uma data. Por exemplo, digamos que eu tenha armazenado a data 11/09/04, eu quero que 5 dias depois o sistema me de um alerta, ou seja, no dia 16/09/04 quando eu entrar no sistema deve aparecer uma mensagem por exemplo.Valeu![/quote:321385eee9]Use esta fun��o � bem melhorfunction DateMais(Dat:TDateTime;Numdias:Integer): TDateTime;{ Soma um determinado n�mero de dias � data atual }begin Dat := Dat + Numdias; Result := Dat;end;...

R�mulo Barros · Answer

[code:1:bd5e2b85e3]IncDay(Data,5);[/code:1:bd5e2b85e3] :lol:  :lol:  :lol:  :lol:...