Fórum Como programar um Timer para executar uma ação todos os dias e verificar se já foi executado no dia de hoje #612447
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.
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
Curtir tópico
+ 0
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
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)