Hallo allerseits,
ich habe folgendes Problem: Ich habe ein Formular, beim ersten Laden müssen viele Datensätze berechnet werden. Deshalb wollte ich diese Zeit mit einem Willkommensbildschirm überbrücken. Der Wilkommensbildschirm ist einfach ein Formular (ohne Buttons etc), auf dem sich ein Bild (TImage) befindet. Die FormCreate des Hauptfensters sieht so aus:
Delphi-Quellcode:
procedure TMainForm.FormCreate(Sender: TObject);
var
welcomeScreen: TWelcomeScreen;
begin
self.Visible := false;
welcomeScreen := TWelcomeScreen.Create(nil);
welcomeScreen.Show();
// Berechungen
Sleep(2000);
welcomeScreen.Close();
FreeAndNil(welcomeScreen);
self.Visible := true;
end;
Ich sehe jedoch nur den leeren Dialog, das Bild und sonstiges (habe es auch mal testweise mit einem Label getestet) sind nicht zu sehen. Ersetze ich das welcomeScreen.Show(); durch welcomeScreen.ShowModal(...); dann sehe ich alles, aber der im FormCreate geht es ja dann nicht weiter. wie kann ich das Problem umgehen?
Vielen Dank im Voraus!
Trille