(Resolvido) Verificar intervalo de horario

[robinhocne]

Pessoal já tentei aqui e não consegui.....me dá uma dica nessa lógica aqui;

Preciso verificar o horário atual e comparar com o horário mas no intervalo de 15 em 15 minutos....tipo assim....

Agora é 18:18...

Então tenho panels assim:

18:00

18:15

18:30

18:45

ai terei então que verificar se agora(18:18) está no intervalo acima, como o intervalo é de 15 em 15 nesse caso teria que indicar que o horário do panel é 18:15

como posso fazer isso ?

Edited October 23, 2011 by robinhocne

[robinhocne]

Pessoal já tentei aqui e não consegui.....me dá uma dica nessa lógica aqui;

Preciso verificar o horário atual e comparar com o horário mas no intervalo de 15 em 15 minutos....tipo assim....

Agora é 18:18...

Então tenho panels assim:

18:00

18:15

18:30

18:45

ai terei então que verificar se agora(18:18) está no intervalo acima, como o intervalo é de 15 em 15 nesse caso teria que indicar que o horário do panel é 18:15

como posso fazer isso ?

Resolvido.......

if (Horas = '18:00') or (Horas <= '18:14')  then
    begin
      pnFundo.VertScrollBar.Position := 1467;
    end
    else
  if (Horas = '18:15') or (Horas <= '18:29') then
    begin
      pnFundo.VertScrollBar.Position := 1497;
    end
    else
  if (Horas = '18:30') or (Horas <= '18:44') then
    begin
      pnFundo.VertScrollBar.Position := 1527;
    end
    else
  if (Horas = '18:44') or (Horas <= '19:00') then
    begin
      pnFundo.VertScrollBar.Position := 1557;
    end;