Portal    Foro    Buscar    FAQ    Registrarse    Conectarse

Manejo De Eventos

Manejo De Eventos
Artículo
Responder citando    Descargar mensaje  
Mensaje 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..




 
Ricardo Prieto - Ver perfil del usuario Enviar mensaje privado  
Ricardo Prieto [ Jueves, 17 Diciembre 2015, 20:04 ]
 


Manejo De Eventos
Comentarios
Responder citando    Descargar mensaje  
Mensaje 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




 
shordi - Ver perfil del usuario Enviar mensaje privado  
shordi [ Jueves, 17 Diciembre 2015, 20:15 ]
Responder citando    Descargar mensaje  
Mensaje Re: Manejo De Eventos 
 
Gracias shordl por la ayuda..



 
Ricardo Prieto - Ver perfil del usuario Enviar mensaje privado  
Ricardo Prieto [ Viernes, 18 Diciembre 2015, 15:56 ]
Responder citando    Descargar mensaje  
Mensaje Re: Manejo De Eventos 
 
shordi escribió:  
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.



 
gambafeliz - Ver perfil del usuario Enviar mensaje privado  
gambafeliz [ Viernes, 18 Octobre 2019, 17:11 ]
Responder citando    Descargar mensaje  
Mensaje Re: Manejo De Eventos 
 
Ricardo Prieto escribió:  
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 
v3ctor - Ver perfil del usuario Enviar mensaje privado  
v3ctor [ Viernes, 18 Octobre 2019, 20:26 ]
Responder citando    Descargar mensaje  
Mensaje 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.



 
tincho - Ver perfil del usuario Enviar mensaje privado  
tincho [ Domingo, 20 Octobre 2019, 18:34 ]
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
10.00 10 10 1
 
Publicar nuevo tema  Responder al tema  Página 1 de 1
 
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno