FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour se puede?, tener mas de 1 timer
Posts: 77
Joined: Wed Jun 28, 2006 06:38 PM
se puede?, tener mas de 1 timer
Posted: Fri Sep 05, 2008 05:50 PM

que tal amigos, espero se encuentren muy bien...

tengo un pequeño problemita con un programa de monitoreo que maneja dos timers uno que ejecuta una accion cada segundo (reloj) y otro que se ejecuta cada minuto. El problema es que despues de unos 10 u 8 minitos de estar ejecutando el programa se queda congelado y no responde y tengo que "tronarlo" con CRTL+ALT+SUPR.

tengo un programa de reloj checador y funciona sin problema solo que eso solo maneja 1 timer.

entonces mi duda es si el tener mas de 1 timer provoca el error. ayuuuuda!! :cry:

saludos
alex.

Posts: 731
Joined: Fri Oct 07, 2005 07:42 AM
Re: se puede?, tener mas de 1 timer
Posted: Fri Sep 05, 2008 08:10 PM

Yo tengo un utilidad donde corren 2 timers y de momento no he tenido problemas, eso si, lo que tengo puesto es que si mientras uno esta realizando una accion, el otro no puede hacerla hasta que el otro termine.

Ejemplo.

STATIC lProcess := .F.

Function Accion_Timer1()
if !lProcess
lProcess := .T.
< hago lo que quiero>
lProcess := .F.
endif
return nil

Function Accion_Timer2()
if !lProcess
lProcess := .T.
< hago lo que quiero>
lProcess := .F.
endif
return nil

Yo lo tengo asi por una serie de cuestiones, demasiado complicado de explicar, pero quizás este te solucione el tema.

Saludos

Rafa Carmona ( rafa.thefullARROBAgmail.com___quitalineas__)

Continue the discussion