Como somar data

13/05/2003

1

Pessoal como faço para soma data ex:

tenh hoje no banco de dados gravado.. 12/05/2003 ou seja esta data ja esta ultrapassada no meu cadastro e quero atualiza-la para mais 180 dias como ficaria isso em codigo...


Aguardo..


Fabiano


Responder

Posts

13/05/2003

Xanatos

voce só precisa adicionar 180 ou o valor que quiser a uma variavel do tipo TDateTime...

Ex: usando dois edits...

var D: Tdatetime;
begin
d:= StrtoDate(Edit2.Text);
d:= d+30;
Edit3.Text:= DateTostr(d); // 30 dias a mais...
end;


Responder

13/05/2003

Th_moreira

Você pode utilizar a funçao incday

IncDay(<data>, <numero de dias>)

Análogamente, existem as funções incMinute, incHour, incMonth...

Att.

Thiago.


Responder

13/05/2003

Aroldo Zanela

Pessoal como faço para soma data ex: tenh hoje no banco de dados gravado.. 12/05/2003 ou seja esta data ja esta ultrapassada no meu cadastro e quero atualiza-la para mais 180 dias como ficaria isso em codigo... Aguardo.. Fabiano


Fabiano,
Var dData: TDate;
begin
dData := tbTabVENCIMENTO.Value + 180;


Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira