Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

No se como hacer??

06/03/2006 - 04:38 por Karlos Traveceras | Informe spam
Mis estimados les explico.

tengo el form1 el cual tiene un grid.
al yo darle clic a boton1. me abre un segundo form con los datos del grid q
seleccione.

si yo sigo seleccionando otra fila en el grid . los datos del form2 me
actualiza la informacion.

hasta ahi todo bien..
el problema surge de la siguiente manera

en la parte de las declaraciones publicas de mi clase declaro al form2
dim gen as new generales

en el evento click del boton pongo algo similar para mandar informacion a
form2
gen.show

gen.txb_id.Text = Trim(Grid_prod(0, Grid_prod.CurrentCell.RowIndex).Value)
gen.txb_desc1.Text = Trim(Grid_prod(1,
Grid_prod.CurrentCell.RowIndex).Value)
gen.txb_desc2.Text = Trim(Grid_prod(2,
Grid_prod.CurrentCell.RowIndex).Value)


en el evento currencellchanged del grid hago exactamente lo mismo para
mandar informacion al form2 q anteriormente se verifico estuviera abierto.

gen.txb_id.Text = Trim(Grid_prod(0, Grid_prod.CurrentCell.RowIndex).Value)
gen.txb_desc1.Text = Trim(Grid_prod(1,
Grid_prod.CurrentCell.RowIndex).Value)
gen.txb_desc2.Text = Trim(Grid_prod(2,
Grid_prod.CurrentCell.RowIndex).Value)


hasta ahi todo exelente.

pero mi problema surge cuando cierro el form2 y lo quiero volver a abrir..
me manda el error de q la instacia no existe.

y eso es correcto ya q yo la declare en donde se declaran las variables
publicas de la clase.. y solo me funciona una sola vez..

he intentado poner el - dim gen as new generales - en el evento clic del
boton1 pero me marca errror en las lineas q utilizo para mandar informacion
en el evento currencellchanged del grid

he intentado con el evento my con algo similar a esto
my.forms.generales.textbox1 = gen.txb_desc1.Text =
Trim(Grid_prod(1, Grid_prod.CurrentCell.RowIndex).Value)
pero no me despliega nada.

esto para mi seria lo ideal .

alguien sabe o tiene una idea de como :
enviar datos a otro form. q no sea la misma q estoy utilizando.

o algun comentario q me sea util..

sin mas..

Gracias..

KArlos Traveceras
 

Leer las respuestas

#1 Eduardo A. Morcillo [MS MVP VB]
06/03/2006 - 07:31 | Informe spam
El error es porque pese a que la referencia sigue existiendo despues de
cerrarse el formulario, este esta "disposed". Una vez que el formulario esta
en este estado no tiene vuelta atras y debes crear otra instancia. Entonce
en lugar de declarar la variable como As New, le quitas el New y creas la
instancia en el evento click del boton, pero chequeando primero.

Dim gen As generales


Sub Button1_Click(...)

' si gen esta vacio o la instancia esta
' disposed creo una nueva instancia
If gen Is Nothing OrElse gen.IsDisposed() Then
gen = New generales()
End If

' ...

End Sub

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo
http://mvp.support.microsoft.com/pr...4EF5A4191C

Preguntas similares