Título: Fomulario Modal Publicado por: TheGhost(Z) en 25 Agosto 2010, 15:46 pm Hola como puedo devolver un valor al cerrar una ventana modal
'Formulario Principal Código: Dim UsuarioLegitimo As Boolean Cuando llego esta parte del codigo se carga un nuevo FormConprobarUsuario, que por cierto tiene dos TextBox (Usuario y contraseña), y dos Botones (aceptar y cancelar)... el obejetivo es que si, despues de validar, el usuario es correcto devuelva True y sino False. Alguna idea, he intentado muchas maneras pero no me salen resultados.. :huh: :huh: Título: Re: Fomulario Modal Publicado por: Kasi en 25 Agosto 2010, 16:11 pm Prueba a intentar plantearlo al reves, es decir, desde el "padre" abres un nuevo form (que podria denominarse como un hijo) o algo asi.
Ahora plantea el problema al reves, en vez de intentar obtener X resultado desde el padre al cerrar el hijo, hazlo al contrario. Cuando se cierre el hijo, obtienes la referencia hasta el padre y le dejas el resultado donde tu quieras, y luego ya sigues con el script con normalidad. No se si me explico bien. Un saludo Título: Re: Fomulario Modal Publicado por: TheGhost(Z) en 25 Agosto 2010, 16:40 pm He intentado eso. Pero son varias ventanas secundarias que llaman cada uno a un FormComprobarUsuario es decir...
Cada ventanaSecuntaria esta creado con New FormSecundario y cada una de estas llama a un New FormComprobarUsuario Si lo hago al revés como dices.. como sabre que FormSecundario és el que le llamó?? Título: Re: Fomulario Modal Publicado por: BlackZeroX en 25 Agosto 2010, 20:05 pm .
Aqui tienes un Ejemplo: http://infrangelux.sytes.net/FileX/index.php?dir=/BlackZeroX/Programacion/vb6/ejemplos%20VB6/RaiseEvent Dulces Lunas!¡. Título: Re: Fomulario Modal Publicado por: TheGhost(Z) en 25 Agosto 2010, 20:17 pm Estudiaré el código. les aviso, luego.
Título: Re: Fomulario Modal Publicado por: BlackZeroX en 25 Agosto 2010, 20:28 pm un pequeño error Borrar en el Frm_Login este evento Código
en Frm_Main hay una variable llamada LoginNow no tiene en el codigo ningun uso por lo cual se puede borrar.... bueno mejor dejoa qui el codigo corregido!¡. http://infrangelux.sytes.net/FileX/index.php?file=/BlackZeroX/Programacion/vb6/ejemplos%20VB6/RaiseEvent/Ejemplo%20FormReturnValue%20V2.zip&dir=/BlackZeroX/Programacion/vb6/ejemplos%20VB6/RaiseEvent& Dulces Lunas!¡. Título: Re: Fomulario Modal Publicado por: Tokes en 25 Agosto 2010, 20:35 pm No sé si entendí bien. A ver:
Si se crea un formulario en forma modal no se puede hacer nada más con los otros formularios, puesto que el formulario en forma modal toma el control total. Entonces, no puede haber varios formularios modales a la vez ¿O sí? En el caso de que solo pueda haber un formulario modal a la vez ¿Porqué no pones una variable pública en un módulo BAS? Esa variable será tipo boolean y sólo podrá ser modificada por un formulario modal a la vez. Si me equivovo, mil disculpas. Saludos. Título: Re: Fomulario Modal Publicado por: TheGhost(Z) en 25 Agosto 2010, 21:23 pm BlackZeroX , muchas gracias. aunque no es tan simple como un InputBox, pero funciona y es lo que importa. aquí mostraré el código para los que andaban en lo mismo. cambié algunas cocitas pues ya depende para la finalidad del uso.
En el FormularioPrincipal Código: Private WithEvents FrmLogin As frmUser En el formulario: Login Código: Public Event Resultado(ByRef e As Boolean) Gracias... :D Título: Re: Fomulario Modal Publicado por: BlackZeroX en 25 Agosto 2010, 21:34 pm correciones Logicas!¡.
Código
se obvia ya que cualquier Boolean siempre al inicio es False!¡. Aqui otras!¡. Código
por Código
y Código
por Código
Ducles Lunas!¡. Título: Re: Fomulario Modal Publicado por: goldarg en 30 Agosto 2010, 19:50 pm Te traigo una solucion simple:
Crea un Modulo1 y declara Código: Public logueo as single En el form FormComprobarUsuario Código: Private Sub cmdValidar_Click() Y en el boton que llames al FormComprobarUsuario pones Código: dim f as form Me funcionó bien, pero no se si eso es lo que buscabas |