Einzelnen Beitrag anzeigen

k4ni

Registriert seit: 17. Jul 2007
Ort: Ulm
258 Beiträge
 
Delphi 7 Enterprise
 
#1

Form3 in Form1Create erstellen

  Alt 15. Jul 2008, 14:17
Hallo,

Ich habe folgendes problem:
Bei meiner anwendung werden im OnCreate ein paar sachen aus einer Datenbank geladen, und manchmal kann das länger dauern und dann muss man warten bis die form angezeigt wird.
Deswegen hab ich mir jetzt eine neue form gemacht (Form3) die ein label auf sich hat "Loading...".
So dann wollte ich das so manuell erstellen damit ich es im Form1Create schon verwenden kann:

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
Form3 := TForm3.Create(Self);
Form3.Show;
Die form wird dann schon angezeigt, aber das label nicht, dann hab ichs so versucht:

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
Form3 := TForm3.Create(Self);
Form3.Label1 := TLabel.Create(Form3);
Form3.Label1.Visible := true;
Form3.Show;
Ging auch nicht :/
Erst wenn Form1Create fertig ist wird das label auf Form3 angezeit? Wieso? Und wie kann ich das schon von anfang an sichtbar machen?

thx
  Mit Zitat antworten Zitat