Author: Peter Below
In win95 or NT4, there's a 'zooming effect' when an application is minimized to the
taskbar or restored from the taskbar. However, this zooming effect does not seem to
be presented in Delphi applications.
Yes, the reason for this is simple: if you click the minimize button of the main
form in a Delphi app, the main form is not minimized but hidden. In its place the
zero-size Application window is minimized. Having the animation in place here gives
some rather weird visiual effects so the VCl designers decided to disable it.
You can switch the effect on or off with the following piece of code, which works
for Win95 and for NT 4:
1 2 procedure TForm1.SwitchEffect(Sender: TObject);
3 var4 Inf: TAnimationInfo;
5 begin6 Inf.cbSize := sizeof(Inf);
7 // 1 = switch it on,8 // 0 = switch if off9 Inf.iMinAnimate := 1;
10 SystemparametersInfo(SPI_SETANIMATION, 0, @Inf, SPIF_SENDWININICHANGE);