Aplicacion "Windows Form" que se bloquea... en console Funciona

[[SkG]]

Tengo una aplicación que en consola funcionaba pero necesitaba hacerle una interfaz gráfica.

El caso es que empece un proyecto y copie el modulo de la aplicación de consola y substituí los Console.WriteLine por GUI.TextBox1.AppendText (GUI es el nombre de la class de la interfaz)

Empieza ejecutando la class GUI abriéndose la interfaz y llama al Modulo1.Conexion()

Código:

    Private Sub GUI_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Show()
        Modulo1.Conexion()
    End Sub

Pero acto seguido se bloquea la aplicación (pero internamente sigue funcionando por que en el servidor está activo y puedo interaccionar con ella desde otro cliente), el Modulo1 va enviando información al textbox de todas las interacciones pero probé a que no debugeara y se bloquea igualmente...

No se si me entendéis, a ver si me podéis echar una mano.

Saludos.

P.D: Si alguien cree saber que puede ser o necesita ver el código fuente que me lo diga aquí o me deje un MP con MSN, e-mail o skype para pasárselo.

Saludos

[Peterpay]

Si lo que pasa es que al ser sequencial tu ejecucion se bloquea el GUI , lo que debes hacer es generar un thread, ya sea usando Thread o usar un BackgroundWorker.

revisa sobre el tema.

[[SkG]]

Gracias investigare sobre los threads a ver.

Soy nuevo programando en VB.NET xD

[[SkG]]

A ver usando BackgroundWorker funciona no se bloquea pero no interacciona con la GUI.

Código:

    Private Sub GUI_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Show()
        IRCWorker.RunWorkerAsync()
    End Sub
    Private Sub IRCWorker_DoWork(ByVal sender As Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles IRCWorker.DoWork
        Modulo1.Conexion()
    End Sub

Probaré los threads aunque se ven algo mas complicadillos, aun asi alguna sugerencia?

[Peterpay]

el backgroundworker tiene un evento q es report progress q puede enviar actualizaciones como tu se las indiques a tu gui

[[SkG]]

Si pero eso es en porcentaje, necesito un output en texto.

Edito:
Hay un par de detalles:
Si salta la funcion Enviar() sola por algun evento configurado no sale el texto en la gui pero si uso la funcion Enviar() desde la GUI si que sale el texto en ella...

[Peterpay]

no necesariamente para eso tienen los ProgressChangedEventArgs con un UserState q puede recibir cualquier cosa

[[SkG]]

Pues me estoy volviendo loco por que dice que ha de ser Integer

[Peterpay]

mira este ejemplo pequeño

private void backgroundWorker1_ProgressChanged(object sender, ProgressChangedEventArgs e)
{
textBox1.Text = e.UserState.ToString();
}

private void button1_Click(object sender, EventArgs e)
{
backgroundWorker1.DoWork += new DoWorkEventHandler(backgroundWorker1_DoWork);
backgroundWorker1.RunWorkerAsync();
}

void backgroundWorker1_DoWork(object sender, DoWorkEventArgs e)
{
for (int i = 1; i < 10000000; i++)
{
backgroundWorker1.ReportProgress(1, i);
System.Threading.Thread.Sleep(1000);
}
}

[[SkG]]

Pues debo ser tonto o algo macho no lo consigo:

Código:

    Private Sub GUI_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Show()
        Me.IRCWorker.RunWorkerAsync()
    End Sub
    Private Sub IRCWorker_DoWork(ByVal sender As Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles IRCWorker.DoWork
        IRC.Conexion()
    End Sub
    Private Sub IRCWorker_Progreso(ByVal sender As Object, ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles IRCWorker.ProgressChanged
        Me.RawLog.AppendText(e.UserState.ToString)
    End Sub

Código:

    Sub Conexion()
        Dim Config() As String
        Dim Port, Server As String
        Dim ConfFile As String = "IRC-BoT.cfg"
        Dim ReadConf As New StreamReader(ConfFile)
        Config = ReadConf.ReadLine().Split("|")
        Nick = Config(0)
        Ident = Config(1)
        Info = Config(2)
        Server = Config(3)
        Port = Config(4)
        Channel = Config(5)
        ReadConf.Close()
        GUI.IRCWorker.ReportProgress("Conectando...")
[...]

Asi lo tenia antes de tu ejemplo y no consigo hacer que funcione, probe tambien con GUI.IRCWorker.ReportProgress(1, "Conectando...")

[Peterpay]

RawLog es multiline o un listBox

[[SkG]]

Es un TextBox con propiedad MultiLine

[Peterpay]

ponle el bg.ReportProgress(1,"frase");

pero muestrame cuantas de estas y q tan distribuidas estan, te recomiendo q tambien pruebes un listbox.

[[SkG]]

Sigue diciendo que no es Integer, solo acepta numeros. Creo que voy a intentarlo con Threads

[Peterpay]

q version de .net?

[[SkG]]

Es la 2008, NET Framework 3.5

[Peterpay]

Pues no ha cambiado sigue teneindo ambas sobrecargas, si no prueba el thread.

[[SkG]]

Con Threads lo mismo, no saco output. Voy a reescribir parte del codigo y probar de nuevo con lo otro a ver si estoy haciendo algo mal...

Gracias por todo