Form schritt für Schritt transparent machen !

[Delphiturbo]

Hallo
mein Form mache ich transparent mit dem Code:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
AlphaBlend:=true;
AlphaBlendValue :=100;

Aber schöner wäre es wenn die Form schritt für schritt transparent wird !