[Resolvido]Temporizador não funciona

Fiz o download de um BD "FechaSeInativo" disponibilizado pelo João Paulo. Apliquei os códigos no meu projecto e, não deu certo.
Gostaria de saber o porquê.
Junto a BD com dois formulários, do JP e o form do meu projecto


Luís Antunes

Olá Luís Antunes,

No código tem dez horas em vez de 10 minutos, veja:



Abraço

Boa noite hteixeira
10 Horas foi lapso meu mas, mesmo assim, não resultou.
Aproveitando o meu lapso pergunto, existe algum limite de tempo?


Luís Antunes

Alterei para 1 minuto, para ver que funciona.
Logico que se mexer o mouse, o temporizador vai zerar, para poder trabalhar no form.

Download

@JPaulo, boa noite

Eu gostaria de usar teu código no meu projeto, mas meu projeto tem muitos forms. Como faço para otimizar isso para cada form?

Abs

Boa tarde pessoal, também estou com a mesma duvida, como aplicar este exemplo em multiplos formulários?

Olá a todos,

Hilário Benjamim, seja Bem-Vindo ao fórum.

Quanto à dúvida, deve repetir o código em todos os forms que pretende.

Abraço

ahteixeira obrigado pelas boas vindas, agradeço também pelo retorno, fiz conforme orientou e funcionou direitinho

Olá Hilário Benjamim,

Obrigado pelo retorno, o fórum agradece.

Olá a todos,

Luis Antunes, como ficou a situação, o feedback também é muito importante.

Se resolveu a dúvida, não se esqueça de dar o tópico como Resolvido, veja como fazer:
https://www.maximoaccess.com/t860-resolucao-de-topicos

Abraço

A dúvida não ficou totalmente resolvida mas para o projecto funciona.

Olá a todos.

Luis Antunes, se não ficou esclarecido deve dar mais detalhes.
O colega Hilário até deu o seu testemunho que funcionou.

Pode sempre reabrir o tópico.

Abraço e bons estudos

Boas

Não funcionou completamente mas funciona bem no projecto


Grato a todos


Luís Antunes

Olá Luis Antunes,

O que pretende dizer com "Não funcionou completamente".
Deve explicar detalhadamente o que está acontecer, onde e como e o que pretendia obter, se possível com exemplo para se testar o seu "Não funcionou completamente".

Abraço

Boa noite a todos!

no meu funcionou muito bem, usando o exemplo acima postado, fiz como foi recomendado e colei o código a baixo em todos formularios da minha BD e ficou assim:

Private Sub Form_Load()
'ao carregar deste form, valida se Formulario_Sistema está aberto
'se estiver, pára o relógio
   
If CurrentProject.AllForms("Participante").IsLoaded Then
      Forms!Participante.Form.TimerInterval = 0
      Forms!Participante.Form.Form!lblTempo.Caption = "00:00:00"
     
   End If
   
   If CurrentProject.AllForms("Caução").IsLoaded Then
      Forms!Caução.Form.TimerInterval = 0
      Forms!Caução.Form.Form!lblTempo.Caption = "00:00:00"
     
   End If
   
    If CurrentProject.AllForms("Formulario_Sistema").IsLoaded Then
      Forms!Formulario_Sistema.Form.TimerInterval = 0
      Forms!Formulario_Sistema.Form.Form!lblTempo.Caption = "00:00:00"
     
   End If
   
   If CurrentProject.AllForms("Processo").IsLoaded Then
      Forms!Processo.Form.TimerInterval = 0
      Forms!Processo.Form.Form!lblTempo.Caption = "00:00:00"
     
   Else
   
   Forms!Arguido.Form.TimerInterval = 1000
   
   
   End If

End Sub

Boas
Envio a imagem das zona que o zera e não zera