Discussion :

[colorid]

Bonjour à tous,

Avant l'affichage de la form principale la form Splash s'affiche avec un ProgressBar qui se remplit pendant le chargement de fichiers qui s'effectue dans la form principale.

Comment écrire le code pour que la form Splash s'affiche avant la form principale qui ne s'affiche que quand la ProgressBar est complète ?

Merci à tous

[ShaiLeTroll]

il suffit de créer le Splash de la forme TSplash.Create + Show avant le CreateForm(Main)Tu as plein d'exemple sur le forum, j'ai pas le temps de chercher mais j'ai fourni un code complet à ce sujet

[colorid]

Ok ShaiLeTroll mais le progressbar du Splash est nourri par la MainForm puisqu'il progresse avec le chargement des fichiers nécessaires à la MainForm, La mainform doit donc être créée avant son OnShow...

[colorid]

Mille excuses ShaiLeTroll j'ai pu écrire le code suivant à partir d'un exemple du forum :

Code :

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

1
2
3
4
5
6
7
8
9
10
  Application.Initialize;
  StartForm := TStartForm.Create(Application); { Création la fenêtre de Splash }
  StartForm.Show;                              { Affichage de cette fenêtre    }
  StartForm.Update;                            { forçage de l'affichage Splash }
  Application.CreateForm(TFormMain, FormMain); { Création fenêtre proincipale  }
  FormMain.Hide;                               { Fenêtre principale cachée     }
  FormMain.Starting;                           { Chargement des fichiers       }
                                               { Update progressbar            }
  FormMain.Show;                               { Affichage fenêtre principale  }
  Application.Run;

Je coche Résolu