Herencia
Hola, estoy trabajando con Delphi7 en vcl, el tema es que estoy creando formularios que me sirven de base para otros formularios, asi tengo una jeraquia de 4/5 formularios, el problema es que por temas relacionados con la seguridad del sistema, yo en el formulario base de todos (el mas alto en la jeraquia f01) implemento dicha seguridad, y si no cumple ciertas condiciones el formulario no se debe abrir. Tengo eventos en todos los OnShow y en todos los OnClose de los formularios de la herencia.
yo lo que necesito es que si no se cumple la condicion del formulario f01, no se siga con nada mas, es decir no ejecute nada mas, pero el tema es que cuando esto sucede, yo disparo un close del f01, lo que dispara el close de todos los formularios, y como la validacion de seguridad la tengo en el onShow, luego de disparar los close correspondientes intenta seguir disparando los shows y ahi da error, yo lo que necesito es poder interrumpir esa ejecucion de los shows en el mismo lugar que obligo a hacer los close. ¿Alguien sabe como interrumpir esta ejecucion en la herencia? (El abort me da error)
Gracias
Lisandro
|