was ist neu ¦  programmier tips ¦  indy artikel ¦  intraweb artikel ¦  informationen ¦  links ¦  interviews
 sonstiges ¦  tutorials ¦  Add&Win Gewinnspiel

Tips (1541)

Dateien (137)
Datenbanken (90)
Drucken (35)
Grafik (114)
IDE (21)
Indy (5)
Internet / LAN (130)
IntraWeb (0)
Mathematik (76)
Multimedia (45)
Oberfläche (107)
Objekte/
ActiveX (51)

OpenTools API (3)
Sonstiges (126)
Strings (83)
System (266)
VCL (242)

Tips sortiert nach
Komponente


Tip suchen

Tip hinzufügen

Add&Win Gewinnspiel

Werbung

44 Visitors Online


 
...einen Splash Screen anzeigen?
Autor: Thomas Stutz
[ Tip ausdrucken ]  

Tip Bewertung (15):  
     


{1) What is a Splash Screen ?

  The ones you see when an application is loading.
  (You could use splash screens for other purposes)
  These usually display the application's name, author, version, copyright.

2) How do I create a Splash Screen ?
   Add a new form to your project.

3) Change the Name Property of the Form to something like SplashScreen.

4) Change these Properties in the Object Inspector:}

BorderStyle := bsNone
Position := poScreenCenter

{5) Customize your Splash Screen by adding various components: images, labels...

6) Change your Project file (the .dpr file) to something like the code below:
}

{*************************************************************}

{1) Was ist ein Splash Screen ?

Es ist ein Fenster, das vor dem Starten eines Programms gezeigt wird. (Siehe z.B. Word)
Diese Fenster zeigen normalerweise den Applikationsnamen, Autor, Version, Copyright,
Bilder und ein Anwendungs-Icon

2) Wie macht man einen Splash-Screen ?

Füge eine neue Form dem Projekt hinzu.
(Datei, Neues Formular)


3) Ändere die "Name"-Eigenschaft der Form z.B. zu SplashScreen.

4) Ändere folgende Eigenschaften der Form im Objekt Inspektor:}

BorderStyle := bsNone
Position := poScreenCenter


{5) Füge dem Splash-Screen diverse Komponenten hinzu: Bilder, Labels...

6) Die Projekt Datei (die .dpr Datei) sieht schlussendlich etwa so aus:}


{*************************************************************}

program Project1;
uses
  
Forms,
  Windows,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {SplashScreen};

{$R *.RES}

begin
  
SplashScreen := TSplashScreen.Create(Application);
  try
    
SplashScreen.Show;
    Application.Initialize;
    SplashScreen.Update;
    Sleep(1000); // Or a delay command.
    
Application.CreateForm(TForm1, Form1);
    SplashScreen.Hide;
  finally
   
SplashScreen.Free;
  end;
  Application.Run;
end.



 

Bewerten Sie diesen Tipp:

dürftig
ausgezeichnet


Copyright © by SwissDelphiCenter.ch
All trademarks are the sole property of their respective owners