Fenster mit Effekt schliessen !?

[Uncle Cracker]

Ich glaube, dass ist das richtige (sieht auch relativ gut aus):

Delphi-Quellcode:

var
 ani : integer;
begin
form1.width := 372;
ani := 372;
repeat
  ani := ani + 1;
  form1.width := ani;
until ani >= 656;