Como programar um Timer para executar uma ação todos os dias e verificar se já foi executado no dia de hoje

12/08/2020

0

Estou desenvolvendo um serviço em Delphi e preciso programar um Timer que execute o serviço todos os dias as 23h, mas antes de executar ele precisa verificar se já foi executado no dia de hoje.
O serviço já está pronto mas nunca trabalhei com o componente Timer, se alguém puder por favor me dar uma luz, principalmente nessa segunda verificação.
Gabriel

Gabriel

Responder

Posts

09/09/2020

Celso Lenon

salve o dia na propriedade tag do timer.
	if Now>StrToTime('23:00:00') then
		begin
			if Timer1.Tag<>Trunc(Now) then
				begin
					Timer1.Tag := Trunc(Now);
					//executa o procedimento
				end;
		end;
Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

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

Aceitar