Bonjour à tous,
Je développe actuellement une Gmao et dans ce programme j’ai un problème de freeze de formulaire.
Mon programme fonctionne de la façon suivante :
J’ai un formulaire principal (le menu) dans lequel il y a des picturesbox.
Quand je clique sur l’un picturebox j’ouvre un autre formulaire, le formulaire ouvert comporte en général beaucoup d’informations et en plus il lance des requêtes sur SQL server qui prennent aussi un certain temps.
Afin que l’utilisateur final ne pense pas qu’il est planté je veux ouvrir un petit formulaire(splash) pour afficher un GIF (cela permettrai de montrer le traitement).
J’ai utilisé plusieurs techniques mais le résultat reste pareil le formulaire avec le GIF freezer et ce rafraichis seulement quand tous les formulaires sont chargés. Ce n’est pas l’effet voulus.
dans le Load du 2éme formulaire :
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
 
  Cursor = Cursors.WaitCursor
  Me.Icon = Ico_IconeGmao
  Me.Topmost = False
  Int_Index = 0
  Bol_ModeRafraichissement = True
  Me.KeyPreview = True
  Splash.show()
  Splash.topmost = True
  Thr_Monthread = New Thread(Sub()
                   If Cls_Ouverture_Connexion_Sql() = True Then
                   	Application.Exit()
                    Exit Sub
                   End If
                   If Cls_Ps(0, Grid_Fournisseur, True, False, 76, "Ps_xxx") = True Then Sub_Exit()If Cls_Fermeture_Connexion_Sql() = True Then
                     Application.Exit()
                     Exit Sub
                   End If
                   Sub_Rafraichissement()
                  Bol_ModeRafraichissement = False
                  Sub_Cursor()
                  Splash.close()
                  '*****************************
                  '** on arrete le MultiTache **
                  '*****************************
                  Return
 
                  End Sub)
Thr_Monthread.Start()
Quelqu'un aurait il déjà eu le problème ?

Merci d'avance.