SET TIMER
SET TIMER ( ticCont )
| Parâmetro | Tipo | Descrição | |
|---|---|---|---|
| ticCont | Integer | → | Número de tics |
Esse comando não é seguro para thread e não pode ser usado em código adequado.
Descrição
O comando SET TIMER permite ativar o evento de formulário On Timer e fixar, para o processo e formulário atual, o número de tics (1 tic = 1/60 de segundo) entre cada evento de formulário On Timer.
Nota: para maior informação sobre este evento de formulário, consulte a descrição do comando Form event.
Este comando não terá efeito se for chamado num contexto no qual não é mostrado um formulário.
Nota: quando o comando SET TIMER será executado no contexto de um sub-formulário (método de formulário do sub-formulário), é gerado o evento On Timer no sub-formulário e não ao nível do formulário pai.
Se passa -1 no parâmetro ticCont, o comando ativará o evento de formulário On Timer "logo que seja possível", em outras palavras, assim que aplicação 4D tome o controle do administrador de eventos. Este principio permite assegurar que um formulário é mostrado completamente antes de iniciar um processo (fluidez da aplicação).
Para desativar por programação o disparador do evento de formulário On Timer, chame novamente a SET TIMER e passe 0 em ticCont.
Exemplo
Imaginemos que você queira, quando um formulário aparece em tela, que o computador faça um bipe a cada três segundos. Pra fazer isso, escreva o seguinte método de formulário:
If(FORM Event=On Load)
SET TIMER(60*3)
End if
If(Form event code=On Timer)
BEEP
End if