Entwickler-Ecke
Sonstiges (Delphi) - Splashscreen
Luncustaf - Fr 15.11.02 00:06
Titel: Splashscreen
hi,
ich hab hier ein splashscreen in mein programm eingefügt. klappt auch alles wunderbar nur hab ich auf dem splashscreen ein label und dass soll anzeigen was gerade passiert - zb wenn ich zu eienr datenbank connecte das das dann angezeigt wird.
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| begin
SplashScreen := TSplashScreen.Create(Application);
SplashScreen.Show;
Application.Initialize;
SplashScreen.Update;
Sleep(1000);
Application.CreateForm(Tfrm_Haupt, frm_Haupt);
Splashscreen.Status.Caption := 'Hauptformular wird geladen'; //Label Caption wird geändert
SplashScreen.Update;
Sleep(1000);
SplashScreen.Hide;
SplashScreen.Free;
Application.Run;
end. |
also das mit der datenbank ist nur ein beispiel was mich stört ist das wenn ich den sleep befehl einsetze das dann immer kommt das sleep ein undefinierter bezeichner ist.
ich hab den code aus dem swissdelphicenter dort ist der sleep auch gesetzt. also muss es denke ich auch so funktionieren.
kann mir jemand erklären wie ich das programm dort kurz anhalten kann so das ich mal sehe das das mit dem splashscreen richtig funktioniert?
gr€€tz
Delete - Fr 15.11.02 00:20
Binde in die dpr-Datei die SysUtils mit ein.
Anonymous - Fr 15.11.02 00:24
Sleep = Unit Windows (also in uses Windows eintragen).
Vor dem Sleep Application.ProzessMesages einfügen. Dann wird das Formular nochmal aktualisiert.
Delete - Fr 15.11.02 00:28
OK, dann ist sie in Windows drin.
Luncustaf - Fr 15.11.02 10:28
und wieder was gelernt :) vielen dank euch beiden :)
:)
gr€€tz
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!