Como programar o TTimer efetuar uma rotina em tal hora?

Question

ColegasComo posso programar o TTimer para disparar uma rotina em tal hora. Estou propondo o desligamento do sistema que inicia as 07:00 para desligar as 16:45 m , acredito que haja uma f�rmula para se...

Edilcimar · Answer

existe a fun��o para pegar a hora atual, coloque-a em uma vari�vel ttime, coloque o timer o qual cada segundo vale mil, a cada X segundos incremente a vari�vel, verifique se a mesma coincide com o hor�rio desejado, caso positivo, dispare o evento desejado

Paullsoftware · Answer

Se entendi bem a sua d�vida, voc� n�o poderia ficar testando a hora usando um if simples n�o?

if horatual = horadesejada then
 begin
  //execute procedimentos
 end;

espero ter ajudado :wink:

Marco Salles · Answer

se entendi sua duvida tecnicamente � mais correto , criar um servi�o e usar TTheads para o processamento...

Helio Nascimento · Answer

Marco Salles - Obrigado pela participa��o mas, o seu colega aqui n�o sabe desenvolver uma TTheads! Nunca tentei, por n�o necessitar e correr atr�s.
N�o tenho id�ia de como desenvolver!!. Desculpe-me, mas � isso..!

paullsoftware / Sua Id�ia n�o pensei. Vou test�-la.

Edilcimar /Obrigado tamb�m por participar. Vou tentar.

Rodc · Answer

Se voc� testar a hora a cada segundo, voc� estar� consumindo processamento desnecess�rio da m�quina. O que voc� precisa � calcular quantos milisegundos faltam para o seu evento ocorrer.

var
dataFutura: TTime;
begin
    dataFutura := StrToTime("16:45");
    Timer1.Interval := MilliSecondsBetween(Time(), dataFutura);
    Timer1.Enabled := true;
end;

Nerdex · Answer

Ol�,Uma alternativa plaus�vel, sofisticada e mais profissional � �passar� esta tarefa para o Sist. Operacional, utilizando o agendamento de tarefas do Windows conforme este exemplo:[code:1:f6b602906f]WinExec(�schtasks /CREATE /TN NOMEdaTAREFA /TR C:WindowsSystem32Calc.exe /RU "NT AUTHORITYSYSTEM" /SC diariamente /ST 16:00:00�,SW_HIDE);[/code:1:f6b602906f]Pesquise outros par�metros que podem ser passados....

Helio Nascimento · Answer

Obrigado a todos. S�o vari�veis de solu��es interessantes!Muito Obrigado pela aten��o aos colegas que me responderam....

F�rum Como programar o TTimer efetuar uma rotina em tal hora? #357016