Categorias

Classe: TTimer

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