TIMER en ventana MDI.

[FiveWiDi]

Hola a todos,

Es posible establecer un TIMER en una ventana MDI (no MDICHILD)?

Lo estoy intentando y parece que no hace nada.

Saludos
Carlos G.

Harbour, Fivewin 9.03

[csincuir]

Carlos, yo lo hago de esta forma:

Defino el timer antes del ACTIVATE WINDOW:

Code: Select all  Expand view

     DEFINE TIMER oTmr OF oWnd ;
           INTERVAL 10000 ;  //=10 segundos,   pero puedes poner los segundos que quieras
           ACTION EjecutaTimer( oTmr )
 

Luego en el ACTIVATE WINDOW, activo el Timer:

Code: Select all  Expand view

ACTIVATE WINDOW oWnd ;
    ON INIT oTmr:Activate() ;
         MAXIMIZED

Y la la función EjecutaTimer:

Code: Select all  Expand view

FUNCTION EjecutaTimer(oTmr)
oTmr:DeActivate()
...
Tu codigo
...
oTmr:Activate()

Return NIL
 

Espero te sirva.

Saludos.

Carlos Sincuir

[FiveWiDi]

Carlos, yo lo hago de esta forma:
...

Carlos Sincuir

Gracias Carlos,

He probado como dices en una ventana MDICHILD y funciona; ahora el asunto sigue siendo el mismo, en una ventana MDI debería funcionar?

Si abren la ventana MDICHILD funciona, pero si la cierran el TIMER deja de existir.

A ver si Antonio, me ilumina un poco.

Saludos y gracias de nuevo
Carlos G.

[csincuir]

Carlos,
El ejemplo que te mande, yo lo tengo funcionando en una ventana MDI, que es la principal de un programa que tengo, y funciona sin ningún problema.
Realmente no se porque no te funciona, esperemos que alguien mas pueda decirte que puede estar pasando.
Suerte.

Carlos Sincuir