Delphi: sliding (animated) panel

Is there a sliding (animated) panel component for Delphi?

For instance it can be found in Raize Components (a left panel with a "Hot Spot" or hide/show button).

I need not a resizeable panel but a panel that can slide horizontally and smoothly from the left to the right + that has a hide/show button (it's not a big deal if without that button).

Thanks!

Try NLDSideBar, a container component written by myself that is collapsable and aligned along the left or right side of its parent.

Interface:

property Align: TSideBarAlign default alLeft;
property AutoHide: Boolean default False;
property Hint: String;
property MinWidth: Integer default DefWidth;
property OnAutoHideChanged: TNotifyEvent;
property OnHide: TNotifyEvent;
property PinButtonDownHint: String;
property PinButtonUpHint: String;
property PinButtonVisible: Boolean default True;
property Resizable: Boolean default True;
property SideButtonWidth: Integer default DefSideButtonWidth;
property Caption;
property Color default clBtnFace;
property Font;
property ParentColor default False;
property ParentFont;
property ParentShowHint;
property PopupMenu;
property TabOrder;
property TabStop;

Or maybe this older version which is animated. Free to use, free to modify.

^{Sorry for being self-promotive, but I think it's an answer to the question.}