hi leute,
ich hab nen splashscreen der so funktioniert.
Delphi-Quellcode:
begin
SplashScreen := TSplashScreen.Create(Application);
try
SplashScreen.Show;
Application.Initialize;
SplashScreen.Update;
Sleep(2000); // Or a delay command.
Application.CreateForm(THauptfenster, Hauptfenster);
SplashScreen.Hide;
finally
SplashScreen.Free;
end;
Application.Run;
auf der Form hab ich ausserdem eine ProgressBar.
jetzt soll sich die progressbar.position alle 20ms um 1 erhöhen, so das nach 2 sekunden die progressbar voll ist und das hauptfenster sich öffnet. aber irgendwie krieg ich das nicht hin.
kann mir da wer helfen?