Página 1 de 1
Cambio de pestañas en FormFolder
Publicado: Vie Jul 18, 2025 6:40 pm
por 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
Re: Cambio de pestañas en FormFolder
Publicado: Dom Jul 20, 2025 5:20 pm
por 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
Re: Cambio de pestañas en FormFolder
Publicado: Lun Jul 21, 2025 2:45 pm
por ddupre
Ignacio,
Muchas gracias por la solución.
La probaré y le cuento.
Saludos
Re: Cambio de pestañas en FormFolder
Publicado: Mar Jul 22, 2025 12:32 am
por ddupre
Ignacio,
Funcionó perfecto, es justo lo que buscaba hacer.
Muchas gracias.
Saludos
Re: Cambio de pestañas en FormFolder
Publicado: Mar Jul 22, 2025 9:58 am
por ignacio
ddupre escribió: Mar Jul 22, 2025 12:32 am
Ignacio,
Funcionó perfecto, es justo lo que buscaba hacer.
Muchas gracias.
Saludos
Estupendo. Saludos