FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour duda de funcionamiento del TIMER
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM

duda de funcionamiento del TIMER

Posted: Sun May 27, 2012 02:22 PM

Hola.

una vez que esta funcionando el TIMER si le hago un DEACTIVATE el timer se pone en pausa o se detiene? a lo que me refiero es: si luego de hacerle un ACTIVATE continua su cuenta de donde
quedó antes del DEACTIVATE o comienza desde cero nuevamente?

necesito q haga una pausa. no que vuelva a cero.

gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM

Re: duda de funcionamiento del TIMER

Posted: Tue May 29, 2012 01:05 PM
Goosfancito;
A ver si mi sample te ayuda:
Code (fw): Select all Collapse
METHOD SetTimer( oBtn, nOpcion, nTmrOff )    CLASS  TDbf2FTP
static nMaxTmr
local  oSelf:= Self, ;
       oTimer, ;
       cCaption:= BeforAtNum( "...", oBtn:cCaption )

   DEFAULT nMaxTmr:= nTmrOff         // Le paso el nro de segundos que quiero que muestre algo

   DEFINE TIMER oTimer OF soDlg INTERVAL nMaxTmr*200 ;
          ACTION if( nMaxTmr >= 1, ( oBtn:SetText( cCaption+"..."+Str(nMaxTmr,1) ), --nMaxTmr ), ;
                                   ( nMaxTmr:=  nTmrOff, oTimer:End(), ;                    // Cuando es igual a 0, reasigno nMaxTmr y doy :End()
                                     if( nOpcion==_DESCOMP, soWnd0:End(), soDlg:PostMsg( WM_KEYDOWN, VK_ESCAPE, 0 ) ) ) )

   ACTIVATE TIMER oTimer

   return( nil )


Esto lo que hace es poner en un Boton el texto "Salir...3", "Salir...3", etc.
Como verás al llegar a o desactivo el Timer. Para activarlo, vuelvo a llamar el metodo SetTimer()

Saludos
Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM

Re: duda de funcionamiento del TIMER

Posted: Tue May 29, 2012 01:06 PM

Aclaro;
debi escribir: "Salir...3", "Salir...2", etc.

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

Continue the discussion