Problem beim langsamen einblenden eines Formulars

[dragi]

Hallo,

ich möchte erreichen das ein Formular langsam aus dem nichts erscheint. Auf dem Formular liegt unter anderem ein Button.

Code:

Form2.Show;
for i := 0 to 220 do
  begin
    Form2.AlphaBlendValue := i;
    Sleep(2);
  end;

Das Problem bei dem dem code ist nun aber das zwar mein Formular langsam aus dem nihcts erscheint aber die Controls erst zu sehen sind wenn das Formular komplett da ist. Dann erscheinen die Controls plötzlich...bis dahin ist das Formular nackt. Außer ein Shape, das verhält sich genau wie das Formular.
Habt ihr eine Idee wie ich es hinbekomme das alles während das Einblendvorgangs zu sehen ist?

Vielen Dank

Dragi

[Ultimator]

Hilfts was, das Sleep(2) durch Delay zu ersetzen?

[BenjaminH]

Es reicht vermutlich ein Form2.Refresh aufzurufen