Breitenänderung des Fensters animieren?

[Matze]

Beispielsweise so:

Delphi-Quellcode:

for i := 1 to 20 do
begin
  Width := Width + 3;
  Left := (Screen.Width - Width) div 2;  // Zentrieren

  Delay(20);  // In der Code-Library nach dieser Funktion suchen
end;