somando datas
O negócio é o seguinte, preciso fazer um recibo num programa pra uma imobiliária onde vc coloque a primeira data e no campo da segunda data some exatamente trinta dias da primeira data, pois no caso esse seria o período do aluguel. alguma tem alguma idéia?, só falta isso pra poder acabar o sistema
Valeu
Valeu
Trovão
Curtidas 0
Respostas
Data
12/04/2003
O teu problema é bem simples meu.
As variáveis do tipo TDate fazem automaticamente a soma e te dão a resposta correta.
Para fazer o teste que vou te mandar você precisa de 3 Edits e um Botão.
No Evento OnClick do Botão Insira o seguinte código:
Edit3.Text := DateToStr(StrToDate(Edit1.Text)+StrToInt(Edit2.Text));
Com isso, quando você colocar uma data qualquer no Edit1 e uma quantidade de dias qualquer no Edit2, o Edit3 receberá a data resultante.
Espero ter ajudado.
´Ninguem sabe tão pouco que não possa ensinar. Ninguém sabe tanto que não possa aprender.´
As variáveis do tipo TDate fazem automaticamente a soma e te dão a resposta correta.
Para fazer o teste que vou te mandar você precisa de 3 Edits e um Botão.
No Evento OnClick do Botão Insira o seguinte código:
Edit3.Text := DateToStr(StrToDate(Edit1.Text)+StrToInt(Edit2.Text));
Com isso, quando você colocar uma data qualquer no Edit1 e uma quantidade de dias qualquer no Edit2, o Edit3 receberá a data resultante.
Espero ter ajudado.
´Ninguem sabe tão pouco que não possa ensinar. Ninguém sabe tanto que não possa aprender.´
GOSTEI 0