Version imprimable
Bonsoir
Quelqu'un pourrait-il m'indiquer comment paramètrer une barrre de progression
j'ai une application en pascal un peu longue à ouvrir (10 secondes environ) et je voudrais mettre une progressbar en attendant l'ouverture.
est-ce possible si oui comment?
MERCI D'AVANCE.
Dans ton Splash, tu peux ajouter une progressBar en initialisant la valeur max avec le nombre de createForm que tu as et la faire évoluer entre chaque CreateForm.
Evidemment, il faudra toujours revenir afin de mettre à jour lors d'un ajout ou d'une suppression d'une form mais ca fonctionneCode:
2
3
4
5
6
7
8
9
10
11
12frmSplash := TfrmSplash.Create(Application); // On crée de la fenetre de Splash frmSplash.ProgressBar.Max := 20; // = au nombre de CreateForm frmSplash.ProgressBar.Position := 0; Application.CreateForm(TFormMain, FormMain); frmSplash.ProgressBar.Position := frmSplash.ProgressBar.Position + 1; Application.ProcessMessages; Application.CreateForm(TForm2, Form2); frmSplash.ProgressBar.Position := frmSplash.ProgressBar.Position + 1; Application.ProcessMessages; ....