Form schritt für Schritt transparent machen !

[Delphiturbo]

geht es nicht vielleicht so :

Delphi-Quellcode:

var i: Integer;
begin

 for i:=1 to 10 do
   begin
   Application.ProcessMessages;
   AlphaBlend:=true; 
   AlphaBlendValue :=AlphaBlendValue + 10;
end;