uso de control timer en .prg

Un ejemplo:

PUBLIC goTmr
goTmr = CREATEOBJECT("MiTimer")

DEFINE CLASS MiTimer AS TIMER
INTERVAL = 1000
PROCEDURE TIMER
WAIT WINDOW NOWAIT "Hora: " + TIME()
ENDPROC
ENDDEFINE

Para quitar el Timer luego haz:

RELEASE goTmr

desde la ventana de comandos

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos


"Jose Luis Lopez" escribió en el mensaje
news:

Necesito inicializar un control TIMER desde un archivo .PRG Como se hace

?

Lo he hecho desde un formulario y es muy sencillo por que solo pego el
control en el formulario e inicio las propiedades, pero ahora lo necesito
inicializar directamente desde un archivo PRG.

gracias

Jose

Luis Maria muchas gracias

-
Jose


"Luis María Guayán" escribió en el mensaje
news:

Un ejemplo:

PUBLIC goTmr
goTmr = CREATEOBJECT("MiTimer")

DEFINE CLASS MiTimer AS TIMER
INTERVAL = 1000
PROCEDURE TIMER
WAIT WINDOW NOWAIT "Hora: " + TIME()
ENDPROC
ENDDEFINE

Para quitar el Timer luego haz:

RELEASE goTmr

desde la ventana de comandos

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos


"Jose Luis Lopez" escribió en el mensaje
news:

Necesito inicializar un control TIMER desde un archivo .PRG Como se hace

?

Lo he hecho desde un formulario y es muy sencillo por que solo pego el
control en el formulario e inicio las propiedades, pero ahora lo
necesito
inicializar directamente desde un archivo PRG.

gracias

Jose