Discussion :

[Rychi]

Bonjour,


je travaille actuellement sur une application client/serveur faisant appel aux socket en mode asynchrone.
concernant les sockets, ca devrait aller. la ou je peche c'est avec le "invoke".

cote du socket serveur, je le connecte avec "Bind" et "Listen" puis je le met en attente d'une connection client avec "BeginAccept". la fin de la connection client se fait dans un autre thread avec "EndAccept", a ce momment la j'aimerais mettre a jour un textbox sur ma fenetre principale. cette fonction s'executant dans un autre thread je ne peux pas le faire directement.
je dois donc utiliser le "invoke". mais au moment ou je l'appel j'ai l'erreur 'Impossible d'appeler Invoke ou BeginInvoke sur un contrôle tant que le handle de fenêtre n'a pas été créé.'.

mon code est le suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
Public Sock_SERVEURlisten As Socket
Public Sock_SERVEURclient As Socket
Delegate Function SERVEUR_AddConnection_delegate()
Public SERVEUR_AddConnection As SERVEUR_AddConnection_delegate = AddressOf SERVEUR_AddConnection_src
 
    Function SERVEUR_Connection(ByVal AdresseIP As String, ByVal Port As Integer)
 
        Dim SERVEUR_ep As IPEndPoint
 
        Sock_SERVEURlisten = New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
        SERVEUR_ep = New IPEndPoint(IPAddress.Parse(AdresseIP), Port)
 
        Sock_SERVEURlisten.Bind(SERVEUR_ep)
 
 
        Sock_SERVEURlisten.Listen(1)
 
        Sock_SERVEURlisten.BeginAccept(AddressOf SERVEUR_NouvelleConnection, Sock_SERVEURlisten)
 
        Form1.txt_serveur.Text = Form1.txt_serveur.Text & "SERVEUR en attente de connection sur " & AdresseIP & " : " & Port & vbCrLf
 
    End Function
 
    Function SERVEUR_NouvelleConnection(ByVal asyncResult As IAsyncResult)
 
        Sock_SERVEURclient = Sock_SERVEURlisten.EndAccept(asyncResult)
        Form1.txt_serveur.Invoke(SERVEUR_AddConnection, Nothing)
 
    End Function
 
    Function SERVEUR_AddConnection_src()
 
        Form1.txt_serveur.Text = Form1.txt_serveur.Text & "Nouvelle connection" & vbCrLf
 
    End Function

l'erreur se produit sur la ligne ou j'appelle la fonction "invoke"



voila, si quelqu'un peut m'aider, c'est la 1ere fois que je suis confronter aux probleme de multi-thread...

[Pol63]

il faut initialiser ton socket un peu plus tard, tant que le controle n'est pas affiché (en gros) tu ne peux pas faire d'invoke dessus

[Rychi]

Si si le controle est afficher, c'est depuis ma 'Form1' que, via des boutons, j'appelle mes fonctions de connection des socket ...
la fenetre et donc le textbox en question est visible a l'ecran au moment de l'erreur.

[Pol63]

ok
en fait c'est que ta fonction est dans une classe ou un module à part
et écrire form1.quelque chose bien que toléré par le compilateur est une source de problème (preuve en est une fois de plus)

vb.net créé une variable publique avec le nom de chaque form de ton projet
ca a été prévu pour les débutants mais ce n'est pas logique (rien que le fait qu'à un instant T on peut avoir 2 fenetres du même type ouvertes, la variable est alors caduque)

dans ton cas ceci génère une nouvelle instance du form, et cette instance par contre n'est pas affichée (d'où le plantage)

en temps normal on (=les intervenants de ce forum) précise qu'il alors avoir une variable privée de type form1, remplie par l'appelant qui passera Me

mais dans ton cas tu as réussi à isoler le code du socket, donc avoir une référence sur un form n'est pas logique, le mieux est alors que tu fasses un event, et que form1 s'abonne à cet event

[Rychi]

en effet, j'ai mis toutes les fonctions lié aux sockets dans un module distinct du reste.
et donc je ne peux pas utiliser le mot-cle "Me" ...

comment puis je faire pour faire le event dont tu me parle?


Merci

[Pol63]

public event monevent (parametres)

puis à la place de setter le textbox tu fais Raisevent monevent

et le form s'abonne (via addhandler par exemple)

au passage le mieux serait de remplacer module par class, sinon c'est un event shared