Página 1 de 1

ejecutar funciones automáticamente (Solucionado)

Publicado: 28 May 2010, 22:44
por taoru
hola, tratando de revisar en mi script si hay mensajes cada cierto tiempo me encontré con un problema, como ahcer esto.
pensé en poner un bucle continuo y revisar el tiempo, pero esto comería mucho proceso, buscando por el foro encontré esta función: AdlibRegister
que se supone que ejecuta una función cada cierto tiempo.
hice este código de ejemplo que me debería lanzar un mensaje cada 10 segundos, pero no funciona, que está mal?.

Código: Seleccionar todo

Func msg()
MsgBox(0, "PROCESO", "REVISO SI HAY MENSAJE")
EndFunc


AdlibRegister("msg", 10000);

Re: ejecutar funciones automáticamente

Publicado: 29 May 2010, 02:03
por Chefito
No hay nada mal, simplemente no has puesto un bucle para que el script no se salga justo después de leer el código.

Código: Seleccionar todo

AdlibRegister("msg", 10000)
While 1
	Sleep(10)
WEnd
Func msg()
MsgBox(0, "PROCESO", "REVISO SI HAY MENSAJE")
EndFunc
Saludos.

Re: ejecutar funciones automáticamente (Solucionado)

Publicado: 29 May 2010, 04:00
por taoru
muchísimas gracias.

lo puse dentro de la interfase gráfica y funcionó...ahora el tema que no sabía porque ahora si funcionaba y antes no...pero con tu explicación quedó la duda aclarada.
muchas gracias!.