GARANTIR DESCONTO

Fórum Saber as Estações do Ano (Primavera Verão Outono e Inverno) #458483

15/10/2013

0

Oi.
Alguém sabe ou tem uma rotina para saber em qual estação do ano estamos?

Obrigado.
Rafael Silva

Rafael Silva

Responder

Posts

16/10/2013

Gustavo Bretas

E ae Rafael, tudo certo?

Baixa o Arquivo (untEstacaoAno.dcu) nesse link: https://www.dropbox.com/sh/1ht8adiotzlw22i/qs7TMeJ17X

Declara a biblioteca no uses do formulário que vc vai usar o método, e chama ela da seguinte forma

  case TEstacaoAno.GetEstacao(DateTimePicker1.Date) of
    eaPrivamera : ShowMessage('Primavera');
    eaVerao : ShowMessage('Verão');
    eaOutono : ShowMessage('Outono');
    eaInverno : ShowMessage('Inverno');
    eaNaoClassificado : ShowMessage('Não Classificado');
  end;


Substitua o DateTimePicker1.Date pelo componente ou variável que vc esta usando.

Apesar de TEstacaoAno ser uma classe não é necessário criá-la para usar o método, blz?

Espero ter ajudado!

Abraço!
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar