A Classe: TTimer cria um objeto que executa um bloco de código respeitando o temporizador.
Método construtor da classe.
Sintaxe
TTimer(): New ( [ nInterval], [ bAction], [ oWnd] ) –> oObjeto
Parâmetros:
nInterval = Numérico. Indica o intervalo, em segundos, para disparar o bloco de código.
bAction = Bloco de código. Indica o bloco de código que será executado a cada intervalo definido.
oWnd = Objeto. Indica a janela ou controle visual onde o divisor será criado.
Retorno:
oObjeto(objeto) = Retorna o objeto criado.
Tela para ver o exemplo: https://tdn.totvs.com/command/getimage?key=fileName%3DTTimer.jpg%2Cmime%3Dimage%2Fpjpeg%2Ctimestamp%3D1314216081209
#include "TOTVS.CH"
User Function TTimer()
DEFINE DIALOG oDlg TITLE "Exemplo TTimer" FROM 180,180 TO 550,700 PIXEL
nSegundos := 2 // Disparo será de 2 em 2 segundos
oTimer := TTimer():New(2, {|| alert(time()) }, oDlg )
oTimer:Activate()
ACTIVATE DIALOG oDlg CENTERED
Return
