TRABALHANDO COM DATA
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
Curtidas 0
Respostas
Comodelphi
05/04/2004
Pq vc não tenta ARITMÉTICA.
NovaData := DataA + 3;
NovaData := DataA + 3;
GOSTEI 0
Luis Neto
05/04/2004
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
GOSTEI 0
Nildo
05/04/2004
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].
GOSTEI 0