FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Salida con Escape
Posts: 728
Joined: Fri Oct 07, 2005 07:38 AM
Salida con Escape
Posted: Wed Aug 22, 2007 10:36 AM

Buenasss, tengo un problema que me ocurre siempre, al que no daba mucha importancia, pero que me pica la curiosidad.
Monto una ventana y en la clausula ON INIT genero un browse, un menú, etc,etc . Bien el tema es que si eres lo suficientemente rápido, cuando pides que se cree la ventana y pulsas escape inmediatamente despues, da un error en la siguiente clase que intenta crear algún objeto dependiente de la ventana. Ya probe con los VALID en el ACTIVATE WINDOW (1º con una variable del tipo VALID !lNoSalgaaas y 2º con VALID !GetAsyncKey(27) con identico resultados)

¿sabeis si puedo mirar algo para solucionar este tema?

Gracias.

Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Salida con Escape
Posted: Wed Aug 22, 2007 12:04 PM

Angel,

Inténtalo así:

DEFINE WINDOW oWnd ...

oWnd:bValid := { || .F. }

...

ACTIVATE WINDOW oWnd ...

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 728
Joined: Fri Oct 07, 2005 07:38 AM
Salida con Escape
Posted: Fri Aug 24, 2007 07:30 AM

Pues no, así obtengo el mismo resultado ... es curioso ¿quizas unos cuantos sysrefresh() antes??

Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Salida con Escape
Posted: Fri Aug 24, 2007 07:53 AM

Angel,

O prueba a deshabilitar la ventana principal tras crearla con oWnd:Disable() (y una llamada a SysRefresh() para que le de tiempo a procesar) y la vuelves a activar despues de haber hecho toda la inicialización con oWnd:Enable(), asi no procesará eventos del usuario

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion