Olá.
Quando você trabalha com TDateTime você deve considerar que este tipo é
um tipo numérico onde cada unidade representa 1 dia. Então, se você
quiser acrescentar dias a qualquer variável do tipo TDateTime é só
somar, exemplo:
data1 := StrToDate('1/12/2006');
data1 := data1 + 10;
Neste caso data1 será 11/12/2006.
Atenciosamente,
Felipe Guerço Oliveira
Escola Nacional de Seguros
Gerência de Informática
(21) 3132-1083
http://www.funenseg.org.br
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Douglas Uesato - Depto. de Informática
Enviada em: sexta-feira, 3 de novembro de 2006 07:52
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Dúvidas com datas
Tatiana,
Declara no uses do seu form a unit DateUtils, lá você vai
encontrar
inúmeras funções para trabalhar com datas.
Para fazer o cálculo da próxima manutenção você pode usar a função
IncDay, ex:
NovaData := IncDay(Now(), 30);
Na função acima, a variável NovaData do tipo TDateTime vai receber
o
valor da função IncDay que irá somar a data de hoje mais 30 dias.
Qualquer dúvida é só chamar.
Atenciosamente,
Douglas Uesato
________________________________________
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em
nome de tatianajvieira
Enviada em: sexta-feira, 3 de novembro de 2006 10:19
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Dúvidas com datas
Olá,
tenho os seguintes dados com datas:
ultima manutenção
período = anual ou semestral
proxima manutenção:= ultima manutenção + perodo
Será que alguém pode me ajudar, não sei fazer cálculos com datas?
Desde já agrdeço a atenção.
Obrigada.
--
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
