Hi,
ich habe einen Splash Screen in mein Projekt integriert.
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12:
| Application.Initialize; Application.Title := 'Administration';
FRM_SPLASH:=TFRM_SPLASH.Create(Application); Frm_Splash.Show;
mysql_connect(); LoadDB;
Application.CreateForm(TFRM_MAIN, FRM_MAIN); Application.Run; |
In Frm_Splash soll ein Bild dargestellt werden. Leider lädt mein Project, wenn die Anwendung startet, das Bild im Splash Screen nicht schnell genug. Das Formular wird dh. nur grau dargestellt.
Die Prozeduren mysql_connect und LoadDB können unter umständen etwas dauern, deshalb soll der Splash ein Bitte warten Bild/Text enthalten.
Nun meine Frage, wisst ihr wie ich Delphi sagen kann, das er zu allererst dieses Bild darstellen soll und dann erst weitermachen soll?
Mit sleep(100); geht’s schon mal nicht.
Vielen Dank schon mal im Voraus,
Lothar Geisinger.