Dê uma olhada na Unit DateUtils, lá tem o que você precisa.
Abraço.
Atenciosamente:
Eduardo Cláudio Nicácio
Analista Programador
Fábrica 02 - CTIS
Tel.: (11) 3150-6841
[EMAI
Ora, é isso aí mesmo que tem que fazer! :-(
Sds.
To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Thu, 21 Jun 2007 17:46:21
+Subject: [delphi-br] Data no delphi
Olá gostaria de saber como faço pra adicionar 7 dias a partir da data de hoje
por ex. var data : tdatetime; begin data := data + 7;
Tá louco meu!
Isso é que é usar canhão pra matar mosquito.
Não entendi a tua colocação Daniel, já que um simples Date +
numero_de_dias mata a charada.
[]
Andrei
Em 21/06/07, Daniel<[EMAIL PROTECTED]> escreveu:
> Velhosincrementar dias...tu vai ter que fazer pelo menos tres funções
> A ordem
var
data : TDATETIME;
begin
data := DATE + 7; // prefiro assim...
// ou se quizer do modo comprido...
data := DATE;
data := data + 7;
end;
Luiz Escobar - Analista/Desenvolvedor:
WEB - HTML/JavaScript/PHP/MySQL
WINDOWS - Delphi/ASSEMBLER/MySQL/xBase
SERVIDORES - IntraNetWare4.11
Assim funciona.
var
data : tdatetime;
begin
data := date + 7;
end;
Eduardo
rzzanatta escreveu:
>
> Olá gostaria de saber como faço pra adicionar 7 dias a partir da data
> de hoje por ex.
>
> var
> data : tdatetime;
> begin
>
> data := data + 7;
>
> end;
>
> desse jeito nao funciona, como faço?
Cara, aqui funciona perfeitamente.
Por via das dúvidas, declare data como TDate ao invés de TDateTime.
Outra coisa: no seu código você não está alimentando a variável data
antes de adicionar 7 dias a ela. aí não vai funfar mesmo. Vai
adicionar 7 a 31/12/1899 que é o equivalente a uma variavel dat
Da uma lida neste artigo
http://www.planetadelphi.com.br/ver_artigo.php?id=136
[]'s
Andreano
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of
rzzanatta
Sent: Thursday, June 21, 2007 10:46 AM
To: delphi-br@yahoogrupos.com.br
Subject:
7 matches
Mail list logo
