Fórum Data altual 3, como? #264679
09/01/2005
0
Estou usando dois DateEdit.
Um está pegando a data atual. Como faço para que o outro DateEdit pegue a Data atual mais 3 dias?
O primeiro viz assim:
procedure TFrmEmprestar.FormCreate(Sender: TObject);
begin
DateEditEmprestimo.Text := dateToStr (now);
end;
Agradeço desde já. Valew :)
Um está pegando a data atual. Como faço para que o outro DateEdit pegue a Data atual mais 3 dias?
O primeiro viz assim:
procedure TFrmEmprestar.FormCreate(Sender: TObject);
begin
DateEditEmprestimo.Text := dateToStr (now);
end;
Agradeço desde já. Valew :)
_celo
Curtir tópico
+ 0
Responder
Posts
09/01/2005
Md
DateEditEmprestimo2.Text := dateToStr(now + 3);
Responder
Gostei + 0
10/01/2005
Paulo_amorim
Olá
Também existe a função IncDay que pode ser usada
Espero que ajude
Até+
Também existe a função IncDay que pode ser usada
tMeuTime := IncDay(Now, 3);
Espero que ajude
Até+
Responder
Gostei + 0
10/01/2005
_celo
Valew, funcionou legal.
:)
Muito obrigado
:)
Muito obrigado
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)