Sucesos de subprocesos

[mariano_donati]

Hola, tengo una duda, que puede ser la fuente del error que me está dando una aplicación con sockets. La cuestión es la siguiente, la aplicación cuenta con dos subprocesos más cada subproceso originado cuando un cliente neuvo que se conecta al servidor. En este subproceso, perteneciente a cada cliente, se origina un evento en el servidor cuando recibe un mensaje de alguno de estos. Cuando ocurre este evento, intento abrir otro form para mostrar el mensaje que llego y que pueda interactuar con el cliente correspondiente desde esa misma ventana, algo así como ocurre con el Messenger. El problema es que el formulario nunca se termina de crear y es como si entrara en un bucle sin fin, y me hace "colgar" la aplicación.
Mi pregunta es la siguiente: ¿se puede abrir una instancia de un formulario a partir de un controlador de eventos de un evento que se origina en un subproceso?

Muchas gracias por su ayuda.
Saludos!.

[mariano_donati]

Efectivamente era eso, no se puede abrir una instancia de un formulario a partir de un evento que se genera en un subproceso. Solamente lo puede hacer el proceso principal. Por lo tanto pude solucionarlo de esta forma:

Procedimiento controlador del evento:

Dim MyDelegate As New ShowFormDelegate(AddressOf ShowForm)

Me.Invoke(MyDelegate, New Object() {acá va la lista de argumentos que le paso al procedimiento ShowForm}


Creo el delegado:

Delegate Sub ShowFormDelegate(mismos argumentos del procedimiento ShowForm)

Private Sub ShowForm(ByVal Ip As System.Net.IPEndPoint, ByVal ClientNickname As String, ByVal Data As String)

Dim NewForm As New frmIndividualMessages(le paso los argumentos necesarios)

NewForm.Show()

Y Listo!.

Se que es muy poco probable que a alguien le sea útil, pero ahí lo tienen por las dudas.
Saludos a todos!.

[Jose_minglein2]

Yo lo que hize cuando tuve ese problema es crear un timer que comprobase el valor booleano que cambiaba el subproceso, así si estaba cambiado, abría el formulario, si no, no.

[mariano_donati]

Como comprobas eso?, esta buena la idea, me parece interesante, tenés algún ejemplo? o es demasiado largo el código?
Saludos!:

[Jose_minglein2]

no es largo, p.ejemplo:

Código:

Dim comprueba as boolean = False
Dim miHilo as Theard

Private sub Form1(..)
miHilo = new Theard(HacerAlgo)
miHilo.Start
Timer1.Start()
end sub

Private Sub HacerAlgo
EsperarLeer    'Puerto, socket, lo que sea
 If Leer
   comprueba = true
 End IF
End Sub

Private Sub Timer1_Tick(...)
  If Comprueba = true
    miHilo.Abort()
    Timer1.Stop()
    Dim miForm2 as new Form2
    miForm2.ShowDialog()
  End if
End Sub

Date cuenta que en el timer_tick paro el timer para que no se siga ejecutando. El resto es adaptarlo a tus necesidades.