Fórum TRABALHANDO COM DATA #224392
05/04/2004
0
COMO POSSO SOMAR MAIS 3 DIAS NA DATA ATUAL
EX
HOJE É 05/04/2004
QUERO QUE O SISTEMA ME MOSTRE 08/04/2004
EX
HOJE É 05/04/2004
QUERO QUE O SISTEMA ME MOSTRE 08/04/2004
Crcam
Curtir tópico
+ 0
Responder
Posts
05/04/2004
Comodelphi
Pq vc não tenta ARITMÉTICA.
NovaData := DataA + 3;
NovaData := DataA + 3;
Responder
Gostei + 0
05/04/2004
Luis Neto
Primeiro preciso saber se esse valor é de um banco de dados, se positivo o formato de dado tem que ser do tipo DateTime.
Então é só calcular Data + 3
Se for de um Edit então, crie uma variavel do tipo Tdate para receber o resultado
Procedure Tfrom.Button1Click...
var
DataR: TDate;
begin
DataR:= StrToDate(Edit1.text)+3
Label1.caption:= DateToStr(DataR);
Qualquer coisa estamos por aqui.
Luis Neto
Então é só calcular Data + 3
Se for de um Edit então, crie uma variavel do tipo Tdate para receber o resultado
Procedure Tfrom.Button1Click...
var
DataR: TDate;
begin
DataR:= StrToDate(Edit1.text)+3
Label1.caption:= DateToStr(DataR);
Qualquer coisa estamos por aqui.
Luis Neto
Responder
Gostei + 0
05/04/2004
Nildo
De acordo com as regras de conduta você NÃO pode postar mensagens com título em letras maiúsculas. Para maiores detalhes clique [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=6689]aqui[/url].
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)