Bom Dia Boa Tarde Boa Noite

[m@r<3|o]

Pessoal , alguem saberia como informar esses comprimentos
ou mesmo tenha uma função para o genero ?

Abraços
Marcelo

[Marcos Guedes]

Utilize um DO CASE tomando por base o horário.

[m@r<3|o]

Funcionou
mais ainda nao sei se precisa de ajustes

Código:

DO CASE
CASE TIME() >= '00:00:01' .and. TIME() <= '12:00:01'
    MESSAGEBOX("BOM DIA")
CASE TIME() >= '12:00:01' .and. TIME() <= '18:00:00'
    MESSAGEBOX("BOA TARDE")
   CASE TIME() >= '18:00:01' .and. TIME() <= '24:00:00'
    MESSAGEBOX("BOA NOITE")
ENDCASE 

Obrigado
Abracos
Marcelo

[Marcos Guedes]

Marcelo, isto resolve, porém eu utilizaria da seguinte forma:

Código:

LOCAL mensagem as String
DO CASE
   CASE TIME() >= '04:00:01' AND TIME() <= '11:59:59'
      m.mensagem = "Bom dia"
   CASE TIME() >= '12:00:00' AND TIME() <= '17:59:59'
      m.mensagem = "BOA TARDE"
   OTHERWISE
      m.mensagem = 'Boa noite'
ENDCASE

?mensagem

Isto, porque estou levando em consideração que o "bom dia" é a partir do momento em que o sol nasce...

[lardecristo]

Olá Marcos, a sua consideração sobre o horário para o "Bom Dia", está incorreta, e certo mesmo é o que o Marcelo fez.

Me desculpe a observação, é que se você for participar de um concurso ou se o seu sistema for mostrar isto para um público mais exigente, por exemplo um software para pessoas intelectuais, vão dizer que isso é um erro, e iram dar boas risadas do programador, estou falando sério.

Vou dar um exemplo real, concurso de Rainha do Carnaval de São Paulo, se a candidata após a meia-noite falar "Boa Noite", ela perde ponto, fora o vexame dos jurados não responderem.

Pergunta:
Dia 06/07/2010 as 23:50 hs, passam-se 20 minutos, que dia será?

Abraços,

[lardecristo]

Ops, esqueci de um outro detalhe
Veja no link abaixo os horários para o nascer do sol para esta semana em São Paulo.

[Você precisa estar registrado e conectado para ver este link.]

[Marcos Guedes]

Olá Marcos, a sua consideração sobre o horário para o "Bom Dia", está incorreta, e certo mesmo é o que o Marcelo fez.

Me desculpe a observação, é que se você for participar de um concurso ou se o seu sistema for mostrar isto para um público mais exigente, por exemplo um software para pessoas intelectuais, vão dizer que isso é um erro, e iram dar boas risadas do programador, estou falando sério.

Vou dar um exemplo real, concurso de Rainha do Carnaval de São Paulo, se a candidata após a meia-noite falar "Boa Noite", ela perde ponto, fora o vexame dos jurados não responderem.

Pergunta:
Dia 06/07/2010 as 23:50 hs, passam-se 20 minutos, que dia será?

Abraços,

Tenho ciência do que você citou, Luiz.
Mas foi como destaquei mais embaixo: "Estou levando em consideração que o "bom dia" é a partir do momento em que o sol nasce".
Pois já me deparei com situações em que se exigia desta forma.

[hugo]

pra mim bom dia eh desde 00.01hs
tarde desde 12.01hs
noite deste 18.01hs

valeu

[m@r<3|o]

Hugo capaz q seja isso
mais tipo .... quando tem ano novo ?
quer dizer que a contagem regressiva para o ano seguinte o mundo inteiro conta errado ?
1 min para o ano novo é 23:59
ano novo 12:00:01 ? Bom dia


sobre a questao
funciona no 16:01 pq coloquei um timer de 1 min e criei um metodo
mesmo a pessoa deixando aberto ira mostrar sempre o comprimento nesse horario
fico reatualizando a label

[hugo]

00.00.00 bom dia pra ser exato

[m@r<3|o]

tenhu minha duvidas tambem sobre
tarde ate 18:59:59
19:00:01 ser horario noturno .....

mais mesmo assim das 18:00 as 19:00 seria horario Alien - que nao existe


mais vo deixar como esta mesmo, igual ao 1 exposto , só que num metodo para atualizar o programa caso haja a troca de cumprimentos

[Julio]

lardecristo escreveu!
Pergunta:
Dia 06/07/2010 as 23:50 hs, passam-se 20 minutos, que dia será?

Não via resposta: seria 07/07/2010?

O correto seria este do Marcelo mesmo?

Marcelo Escreveu!
Funcionou
mais ainda nao sei se precisa de ajustes

Código:

    DO CASE
    CASE TIME() >= '00:00:01' .and. TIME() <= '12:00:01'
        MESSAGEBOX("BOM DIA")
    CASE TIME() >= '12:00:01' .and. TIME() <= '18:00:00'
        MESSAGEBOX("BOA TARDE")
      CASE TIME() >= '18:00:01' .and. TIME() <= '24:00:00'
        MESSAGEBOX("BOA NOITE")
    ENDCASE 

Obrigado
Abracos
Marcelo

[m@r<3|o]

folhando a Rapozine , achei um exemplo

Código:

Hora = {^2001-12-10 03:00:00}
DO case
Case Between(Hour(Hora),6,12)
 MessageBox("Bom Dia!")
Case Between(Hour(Hora),13,18)
 MessageBox("Boa Tarde!")
Case Between(Hour(Hora),19,23)
 MessageBox("Boa Noite!")
 
Case Between(Hour(Hora),0,5)
 MessageBox("Boa Madrugada!")
EndCase

[alceu11]

as 7 de la manha ? e boa madrugadaa?
nao deu certo!!

[m@r<3|o]

kkkk é
precisa de ajuste mesmo !