Re: Threads con funciones o Procedimientos con parámetros

[henry04]

Alamo escribió el 13/04/2005 15:51 :
> Buenas a todos.
>
> Por casualidad alguien ha podido lanzar un thread (es decir un proceso
> hebra) hacia una función o procedimiento que contenga parámetros?
>
> Ejemplo:
>
>
>
> Public Sub New(byval n as integer)
>
> dim hebra as thread
>
> hebra = new Thread(AddressOf Pepe("Hola"))
> 'con está línea en la que inicializo
> 'el proceso indicando a que procedimiento
> 'se ha de lanzar, el compilador me dice que no puedo
>
> hebra.start()
>
> end Public
>
> Public sub Pepe(byval juan as string)
> ...
> ...
> end sub
>
> En definitiva, que si el procedimiento o función tiene
> parámetros, con el
> AddressOf no puedo pasarle parámetros.
>
> Alguien sabe como hacerlo?
>
> Gracias,
>
> Álamo.
>
Si debes primero declara dentro de la funcion donde instancia el thread, una
variable arraylist, en esta variable almacenas todos los paramatro que quieres
enviar y despues cuando instancias el hilo agregas ParameterizedThreadStart
para
pasar el parametro, te dejo un ejemplo:

Public Sub IniciarHilo(ByVal fechavIII As Date, ByVal vesselIII As String)
Dim inicioPF As Thread
Dim todas02 As New ArrayList

todas02.Add(vesselIII)
todas02.Add(fechavIII)

inicioPF = New Thread(New ParameterizedThreadStart(AddressOf tu_sub que
ejecuta
el proceso))
inicioPF.TrySetApartmentState(ApartmentState.STA)
inicioPF.Start(todas02)

End Sub
Acuerdate que el sub que recibe el arraylist debe ser object. espero que te
sirva.