Autor Tópico: Cálculo com Datas  (Lida 7326 vezes)

Montoya

  • Visitante
Cálculo com Datas
« Online: Junho 27, 2008, 08:00:13 pm »
Olá Rapazeada. Sou um daqueles programadores que aprenderam sozinho um pouco de tudo, ou seja com o algorítimo eu vou aos trancos e barrancos em VB, SQL, Java, Access... para criar minhas aplicações. Eu concordo que cálculos com datas é bem fácil, mas COMECEI agora na linguagem windev, e preciso urgente de como adicionar ou subtrair dias da data atual do sistema. Já sei como obter a data atual do sistema, mas não consegui fazer cálculos com ela. Vou aplica-la no evento ao clicar de um alguns btns. VIDA LONGA Á ESTE FÓRUM!!!!!!!

Marcelo Cruz

  • Administrator
  • *****
  • Mensagens: 175
  • Karma: +0/-0
  • .
Re: Cálculo com Datas
« Responder #1 Online: Junho 30, 2008, 12:04:40 am »
Ola Montoya
Seja bem vindo!

Incremento:
vdatavencimento is Date = DateSys()
vdatavencimento..Month += 2
Info (vdatavencimento)

Diferença

info (Datedifference (today, vdatafin))// teste com Today ou datesys()

E por aí vai.... ;)
Abraço
MarceloCruz



juniorschroder

  • Full Member
  • ***
  • Mensagens: 103
  • Karma: +0/-0
Re: Cálculo com Datas
« Responder #2 Online: Junho 30, 2008, 12:12:11 am »
Olá... bem vindo ao forum  ;)

Pra fazer soma com datas conheço 3 formas,  a 1ª é simplesmente somar a data o numero de dias. Por Exemplo:

//Cria uma variavel do tipo data
dData is Date = DateSys()
//Soma a variavel data +10 dias
dData+=10 // O += serve para fazer um incremento, seria o mesmo que: dData=dData+10


Outra forma é utilizar algumas "propriedades" que podem ser encontradas em variáveis do tipo date ou datetime, essas propriedades são Day, Month e Year, é praticamente o mesmo que a 1ª forma, mas podemos aqui usando as propriedades Month e Year somar direto numero de meses e anos e não so dias. Ex:

//Cria uma variavel do tipo data
dData is Date = DateSys()
//Soma a variavel data +3 meses
dData..Month+=3

e por último podemos converter a data para uma variável do tipo inteira, adicionar a esta o numero de dias desejados e converter de volta para o tipo data. Ex:

//Cria uma variavel do tipo data
dData is Date = DateSys()
//Cria uma variavel inteira
nData is Int
//Converte a data para inteiro
nData = DateToInteger(dData)
//adiciona a data no formato inteiro +230 dias
nData+=230
//Converte a Data de inteiro para o formato date
dData = IntegerToDate(nData)



Espero ter ajudado, mais duvidas posta ai, e boa sorte com o Windev


Abraço

Montoya

  • Visitante
Re: Cálculo com Datas
« Responder #3 Online: Junho 30, 2008, 07:33:33 pm »
Legal!!! Deu certo Valeu pessoal. ;D