Cambio de pestañas en FormFolder

[ddupre]

Hola a todos.
En un Form que hereda de FormFolder, estoy intentando evitar que se "dispare" el onExit del control que tiene el foco en el Folder activo, cuando doy click en otro Folder cualquiera del mismo Form y no logro resolverlo.

¿Es posible hacerlo?
Les agradezco toda ayuda puedan darme.

Saludos
Daniel

[ignacio]

Buenas tardes,

He estado mirando se se podía hacer a nivel general para toda la aplicación y me temo que no es posible. Habría que hacer el cambio en método TControl:KillFocus() y eso afectaría a todo Xailer. Este cambio es muy probable que más de un usuario no estuviese de acuerdo. Al fin y al cabo el 'EXIT' se produce. Otra cosa es que no queramos que el evento se dispare.

Le propongo una solución en todos los controles que tenga sobrecargados con OnExit dentro de un formulario. Esta solución SOLO dispara el evento cuando tengan el mismo oParent, que es muy probable lo que usted desea.

Esta sería la plantilla:

Código: Seleccionar todo

METHOD MiControlExit( oSender, oNextCtl ) CLASS TFormSimulated

   IF HB_IsObject( oNextCtl ) .AND. oNextCtl:oParent == oSender:oParent
      // Sólo se dispara el evento CUANDO el control destino está en la misma pestaña
      LogDebug( "run event OnExit" )
   ENDIF

RETURN Nil

[ddupre]

Ignacio,
Muchas gracias por la solución.
La probaré y le cuento.
Saludos

[ddupre]

Ignacio,
Funcionó perfecto, es justo lo que buscaba hacer.

Muchas gracias.
Saludos

[ignacio]

Ignacio,
Funcionó perfecto, es justo lo que buscaba hacer.

Muchas gracias.
Saludos

Estupendo. Saludos