Problem mit Timer

[gfjs]

Hallo, Allerseits.

Auf meinem Startbildschirm erscheint ein Label, das nach 1 Sekunde verchwinden soll. Danach sollen die zur Laufzeit erzeugten Komponenten erscheinen. Das Verschwinden des Labels klappt einwandfrei, nur werden die zur Laufzeit erzeugten Komponenenten schon zu Beginn sichtbar.

Ich habe in MyForm.Create: StartTimer.Enabled := true;

und dann:

Delphi-Quellcode:

procedure MyForm.StartTimer_Tick(sender: System.Object; e: System.EventArgs);
begin
  self.Cursor := System.Windows.Forms.Cursors.Default;
  self.StartPanel.Visible := false;
  self.StartTimer.Enabled := false;
end;

Wie kann ich erreichen, dass die Komponenten erst nach dem Verschwinden des Labels erscheinen.

Wie immer dankbar für jede Hilfe

Gruß Jürgen

PS. Die Komponenten werden in MyForm.MyForm_Activated erzeugt.

[Van HelF]

indem du die komponenten erst erzeugst, wenn das laben verschwunden ist ?!

[gfjs]

@ Van HelF

Das habe ich ja versucht. Ausgehend von der Annahme, dass MyForm_Activated erst nach MyForm_Create ausgeführt wird, habe ich den Timer in MyForm_Create auf enabled := true gesetzt und in MyForm_Activated die Komponenten erzeugt. Das scheint aber nicht richtig zu sein und ich weiß nicht, wo der Fehler liegt.

Gruß Jürgen

[juergen]

Wenn du die Form generell im OI unter Form1.visible := false setzt?
Nach ablaufen der gewünschten Zeit setzt du das auf true.

[gfjs]

@ juergen

Ich habe ja nur ein Formular, nämlich MyForm. Auf diesem Formular soll zuerst ein Label mit einem Begrüßungstext erscheinen. Nach einer Sekunde soll dieses Label verschwinden und die zur Laufzeit erzeugten Komponenten erscheinen.

Gruß Jürgen

[juergen]

Ich sehe 2 Wege:
- eine zweite Form verwenden.
Diese 2.Form mit dem Label anzeigen und dann nach Ablauf der Zeit diese Form beenden und deine MyForm einblenden.
- eine weitere Variante wäre evtl. ein modales Dialogfenster. Das Schließen dieses Dialoges müsstest du dann anstoßen.