Ich hätte gerne auch so einen netten Button auf dem Splash screen wie bei Office 2010 , der
a) vom Benutzer gedrück werden kann falls Ihm das Laden der Applikation zu lange dauert ( und dann CANCEL / Application.Terminate)
b) der den Splashscreen schließt wenn ich einen Fehler beim Laden und Programmdaten habe
c) sich auch so nett in meine Grafik auf meiner SplashScreen einfügt wie bei Office 2010
die *.prj sieh´t bei mir wie folgt aus ....
Delphi-Quellcode:
Application.Initialize;
SplashScreen:= TSplashScreen.Create(Application);
SplashScreen.Show;
SplashScreen.Refresh;
{$IFDEF RELEASE}
SplashScreen.WaitTime := 1000;
{$ENDIF}
{$IFDEF DEBUG}
SplashScreen.WaitTime := 10;
{$ENDIF}
SplashScreen.InfoStatusBar.SimpleText := 'Loading Main ...';
Application.CreateForm(TMainForm, MainForm);
SplashScreen.InfoStatusBar.SimpleText := 'Loading weitere forms ...';
Application.CreateForm(TDie ganzen weiteren Forms , alle meine Forms);
SplashScreen.CheckDiverserThemen;
SplashScreen.ShowDiverseInformationenOnSplashscreen;
/// sollte jetzt hier der Code für meinen Splash Screen rein ???
/// Form schliessen wenn ... ?????
....
Application.Run;
Was für eine Abfage könnte ich einbauen damit nach jedem Laden eines Moduls geprüft wird ob der "Escape" Button gedrückt wurde ?
Unter
http://www.delphipraxis.net/8637-tut...h-screens.html
gibt es zwar einen Button im Splash Screen aber nicht die Möglichkeit die APP auch nicht zu straten jenachdem was a) der Benutzer will oder b) das Ergebnis der Check (zB. Laden der
DLL erfolgreich oder nicht) ...
Wenn ich den Button in ein TImage Integrieren möchte, wie mache ich dies am besten ?