Bonjour,
Voilà j'ai un problème lorsque je tente d'ouvrir une form avec la commande .show(). Je n'ai jamais eu ce genre de problème dans le passé alors il doit y avoir quelque chose que j'oublie. Ce qui ce passe lorsque le .Show est executer c'est que ma fenêtre s'ouvre mais c'est comme si elle tombe dans une boucle sans fin. La fenêtre ne répond pas du tout et si je tente de la déplacer elle devienne toute blanche et je suis forcé de la ferme par le Task manager de windows.
Mon projet est assez simple. Mon programme écoute les message TCP/IP sur un port donnée. Si le message reçu est de type "alarme" je dois alors afficher une fenêtre à l'écran qui indique les proriétés de cette alarme et le responsable peut alors poser des actions sur cette alarme via l'interface.
J'ouvre déjà plusieurs form dans cette application via le .show et je n'ai pas ce problème. La seul différence avec le cas ou ça ne fonctionne pas c'est que la fenêtre "principale" de mon application n'est pas nécessairement active (focus on). Lorsque mon Client "TCP/IP" reçois un message celui-ci "Raise" un event et c'est dans la procédure attacher à cet Event que mon code d'ouverture de fenêtre ce fait. Mon code ressemble à ceci:
Dans ma fenêtre alarm j'ai pour l'instant aucun code car j'ai tout mis en commentaire. Je ne comprends vraiment pas quel est le problème. J'ai passé une bonne partie de ma journée hier au bureau à tenté de comprendre mais je ne vois pas. Si je mets le même code sur l'action d'un bouton ça fonctione alors je ne comprends pas.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Dim newAlarm As frmAlarm If Not lstAlarm.Contains(AlarmID) Then newAlarm = New frmAlarm lstAlarm.Add(AlarmID, newAlarm ) newAlarm .Show() Else newAlarm = lstAlarm(AlarmID) newAlarm .Select() End If
Merci !
Partager