Updated: Dec 16, 2023
Follow on twitter

Showing of controls with animation.

Let's show a panel named as CurPanel on the parent panel which named as AnimPanel. Two procedures may be used for this purpose: PrepareForAnimation and AnimShowControl. They are declared in the sVCLUtils.pas unit.

PrepareForAnimation(AnimPanel, atcRunup); // Saving of first image, lock from redrawing CurPanel.Visible := True; // Changing a panel visibility AnimShowControl(AnimPanel, 150, MaxByte, atcRunup); // Showing with animation // Final redraw of the panel (if needed) // RedrawWindow(CurPanel.Handle, nil, 0, RDW_ERASE or RDW_INTERNALPAINT or RDW_INVALIDATE or RDW_UPDATENOW or RDW_ALLCHILDREN);

"atcBlur" is a type of animation. Also, available such animation types as "atcFade", "atcBlur", "atcBlur2" and "atcAero".

Working example of such animation with frames may be seen in the ASLDemo .






Installing, using and licensing the demo programs © Sergii Goncharov, Ukraine, Odessa 2004-2023