Manejo De Eventos


Objetivo: Manejo De Eventos
Hola a todo me gustaria saber si es posible evitar que un evento ocurra..?
Por ejemplo el evento Form_Close() no quiero que se cierre el Form sin que se cumpla una los item que yo pido.. Agradeceria su ayuda..

Perfil MP  
Objetivo: Re: Manejo De Eventos
Los Eventos ya existen en las clases. Es decir el evento Close hace lo que hace, cerrar la ventanta.
Si tú escribes tu propio evento close ( Public sub Form_Close(), etc. etc.) entonces se ejecuta primero tu código y después el de la clase. Si quieres que este último no se ejecute sólo tienes que añadir STOP EVENT
Es decir algo así:

Public sub Form_Close()

if not mi_condicion then
message("No se puede cerrar ahora")
STOP EVENT
endif

end

Perfil MP  
Objetivo: Re: Manejo De Eventos
Gracias shordl por la ayuda..

Perfil MP  
Objetivo: Re: Manejo De Eventos
shordi escribió: [Ver mensaje]
Los Eventos ya existen en las clases. Es decir el evento Close hace lo que hace, cerrar la ventanta.
Si tú escribes tu propio evento close ( Public sub Form_Close(), etc. etc.) entonces se ejecuta primero tu código y después el de la clase. Si quieres que este último no se ejecute sólo tienes que añadir STOP EVENT
Es decir algo así:

Public sub Form_Close()

if not mi_condicion then
message("No se puede cerrar ahora")
STOP EVENT
endif

end


Gracias amigo shordi eres omnipotente.

Perfil MP  
Objetivo: Re: Manejo De Eventos
Ricardo Prieto escribió: [Ver mensaje]
Hola a todo me gustaria saber si es posible evitar que un evento ocurra..?
Por ejemplo el evento Form_Close() no quiero que se cierre el Form sin que se cumpla una los item que yo pido.. Agradeceria su ayuda..


en la rutina close pone: if variable=condicion stop event

última edición por v3ctor el Viernes, 18 Octobre 2019, 20:27; editado 1 vez
Objetivo: Re: Manejo De Eventos
Otra forma de hacerlo es:
Public Observer As Observer
Public Sub Form_Open()
Observer = New Observer(Me) As "Observer"
End

Public Sub Observer_Close()
If [CONDICION] Then
Me.Close
Else
Stop Event
Endif
End

Por supuesto que [CONDICION] puede tomar la forma que se desee.
Saludos.

Perfil MP  

Página 1 de 1


  
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario

   

Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Página generada en:: 0.108s (PHP: 19% SQL: 81%)
Consultas SQL: 21 - Debug off - GZIP Activado