Molim vas treba mi hitno, kako da napravim splash screen?
Kreiranje Splash Screen-a
Zaključano
Zakačeno
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.
Ovo je samo jedan od nacina.
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.
Ovo je samo jedan od nacina.
Jedan od nacina je kao u prilogu
Potpis
Pomozite Micro$oftu u borbi protiv piraterije, poklonite prijatelju Linux
izmenjeno 1 put, poslednji put JaHvram 19.04.2006. u 20:46
Izmene poruke
- JaHvram19.04.2006. u 20:46zapis iz teksta poruke
Dugo nisam pravio SPLASH screen, ali kad sam ih radio napravio bih form2 (npr.) da bude splash screen (borderless) i onda u form1.oncreate* (vidi kod) stavio bih form2.showmodal i sakrio bih app. iz taskbar-a a na form2 bih stavio timer koji okida na npr 3 sekunde i ontimer izvrsava form2.close i prikazuje app. u taskbar-u 
Ukratko:
Ukratko:
Code:
// u form 1 on show (ne znam da li moze u oncreate*)
showwindow(application.Handle,sw_hide);
form2.showmodal;
// u form2 na timer
form2.Close;
showwindow(application.Handle,sw_show);
// u form 1 on show (ne znam da li moze u oncreate*)
showwindow(application.Handle,sw_hide);
form2.showmodal;
// u form2 na timer
form2.Close;
showwindow(application.Handle,sw_show);
Potpis
Mozda najednostavniji nacin: na main formu se stavi jedan panel (npr tzv pnlAbout) tako da on bude iznad svih ostalih komponenti u main prozoru. doda se HideAbout metoda...... pogledajte source...
poz.
poz.