Guten Tag,
Ich versuche ein "Splash-Screen" zu erstellen. Ich habe das Tutorial durchgelesen was ich durch die Suche gefunden habe.
Ich erstelle in einer TcxScrollbox mehrere Froms. Da dies etwas dauert habe ich einen Splashscreen erstellt. Dieser zeigt nur an "Bitte warten..."
Ich habe folgende Formulare
- frmMain -> Hauptmenü
- frmAuftrag -> Auftragsformular mit der TcxScrollbox
- frmChild -> einzelner Auftrag der in die TcxScrolbox gesetzt wird
- frmLoading -> Splashscreen
Ich erstelle(create) den Splashscreen sobald die Applikation gestartet wird also im frmMain.
Danach wird er direkt auf .hide gesetzt. (Der Splashscreen soll immer erstellt bleiben, ich möchte ihn nur ein oder ausblenden auf verschiedenen Formularen)
Delphi-Quellcode:
//frmMain
procedure Tfrm_Main.FormActivate(Sender: TObject);
begin
frmloading := Tfrm_loading.Create(nil);
frmloading.Hide;
end;
procedure Tfrm_Main.FormClose(Sender: TObject; var Action: TCloseAction);
begin
frmloading.Free;
end;
Aufrufen des Splashscreen:
Delphi-Quellcode:
//frmAuftrag
frmloading.Show;
frmloading.Update;
//...... erstelle alle Childs
frmloading.hide;
Das Problem ist nun das in der TcxScrollBox das letzte Fromular abgeschnitten wird.
Der horizonale Scrollbar wird erst angezeigt wenn sich die Grösse der TcxScrollBox ändert.
Woran könnte das liegen ?
Gruss Int3g3r