Fenêtre "Veuillez patienter..."Résolu

Question

Bonjour,



Vous connaissez tous les fen&#234;tres qui affichent "Veuillez patienter..."
et qui poss&#232;dent une progressbar. Elles n'ont ni boutons, ni cases
syst&#232;mes.



Et bien je voudrais faire la m&#234;me chose mais je ne sais pas trop 

Merci de m'aider.

jrbleboss · Accepted Answer

Voila c'est fait. C'est pas super mais bon....



http://www.vbfrance.com/code.aspx?ID=30836



JRB

edokt · Answer

je voilais demnder 



1. c'est en vb6?

2. La fen&#234;tre doit elle etre ouvert modal

jrbleboss · Answer

Si tu veux ca. Tu creer un form et pour pas avoir les boutons
fermer,reduire,agrandir tu met la propriet&#233; border style a 0 et la c
bon.
Tu veux aussi savoir comment on la laisse au premier plan ?
JRB

Daemonight · Answer

salut !
ya pas mal de source sur ce site qui traitent des progress bar, apres tout depend de ce que tu veux indiquer...
Enfin pour afficher une Form sans boutons ni cases syst&#232;mes, regarde dans les options, je connais plus exactement les noms etant donn&#233; que je n'est pas VB sous la main en ce moment, mais je sais que je l'ai d&#233;j&#224; fait... &#231;a doit etre dans BorderStyle il me semble, on peu mettre "none", au pire regarde dans l'aide, mais je le repette, pas mal de source font une &#233;tude des ProgressBar

Bonne chance !

<----------------------------------------------->
On reconnait un bon developpeur au baobab qu'il a dans la main...

hobbi1 · Answer

Oui c'est en VB6

La fen&#234;tre "Veuillez ...." doit faire patienter en attendant une fen&#234;tre qui met du temps &#224; s'ouvrir et qui elle est en modal



Je connais le border style &#224; 0 mais je ne trouve pas ca top. La fen&#234;tre me parait un peu nue 

Y a pas une autre solution ?



Pour mettre au 1er plan, faut l'ouvrir en modal non ?



Merci.

crenaud76 · Answer

Cette fen&#234;tre ne doit surtout pas &#234;tre modale !!! Car sinon aucun code ne pourra tourner pdt qu'elle sera affich&#233;e !!!

Christophe R

hobbi1 · Answer

Oupsssssssss !!!

Oui c'est vrai crenaud76 !! Je le savais 



Donc personne ne sait comment faire cette sacr&#233; fen&#234;tre "Veuillez ..." ?

Personne n'en a jamais fait

jpleroisse · Answer

Un label.Caption " Veuillez patienter " un Timer et un ProgressBar.

Option Explicit
Private Sub Form_Load()
   prgBar1.Visible = False
   tmrTimer.Interval = 1000
   prgBar1.Max = 10   ' Le contr&#244;le Timer sera actif
                            ' pendant 10 secondes.
       prgBar1.Visible = True
   tmrTimer.Enabled = True
End Sub

Private Sub tmrTimer_Timer()
   Static intTime ' D&#233;clare la variable statique.
   ' La premi&#232;re fois, la variable est vide.
   ' Attribue-lui la valeur 1 si c'est une variable
   ' vide.
   If IsEmpty(intTime) Then intTime = 1
   
   prgBar1.Value = intTime   ' Met &#224; jour le contr&#244;le
                           ' ProgressBar.


   If intTime = prgBar1.Max Then
      tmrTimer.Enabled = False
      prgBar1.Visible = False
      intTime = 1
      prgBar1.Value = prgBar1.Min
       Unload Me
   Else
      intTime = intTime + 1
      
   End If
End Sub

jpleroisse

jrbleboss · Answer

La je suis en train de faire des fenetre "copie en cours" "veuillez
patientez" ect... Donc veuillez patienter et yaura la source.

JRB

hobbi1 · Answer

Merci &#224; tous !!

C'est exactement ca

jrbleboss · Answer

Je suis content qu'une source aussi peu dure t'ait content&#233;.

JRB

Fenêtre "Veuillez patienter..."

11 réponses

Discussions similaires