Zooming effect when minimizing windows

This article has not been rated yet. After reading, feel free to leave comments and rate it.

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.

Peter Below, TeamB explains:

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:

	procedure TForm1.SwitchEffect(Sender: TObject); var Inf : TAnimationInfo; begin Inf.cbSize := sizeof(Inf); // 1 = switch it on, // 0 = switch if off Inf.iMinAnimate := 1; SystemparametersInfo(SPI_SETANIMATION, 0, @Inf, SPIF_SENDWININICHANGE); end;

Comments:

Email address (not necessary): Rate as Off-topic Very Helpful Helpful Ok article Not useful Very bad	Hide my email when showing my comment. Please notify me once a day about new comments on this topic. Please provide a valid email address if you select this option.
It seems that you are from Washington, US . Info/ Feedback on this	Show city and country Show country only Hide my location
You can mark text as 'quoted' by putting [quote] .. [/quote] around it.
Please type in the code:
Add a picture: Please do not post inappropriate pictures. Inappropriate pictures include pictures of minors and nudity. The owner of this web site reserves the right to delete such material.