Como puedo expandir un panel hacia la derecha con un efecto lento?

[NelsonJG]

hola ecfisa.
Tu explicacion de arriba se ve super, pero soy algo nuevo en delphi y no se exactamente como implementar tu codigo con el mio.
Graficamente quiero que cuando expando mi panel fuera con suavidad osea obtener ese efecto de suavidad al momente de hacer clic en mi button de expandir igualmente lo al contraerlo.
Noce si si pueda hacer ejejje lamento mi falta de explicacion pero como te dije soy novato en delphi! seria genial si tuvieras algun ejemplo de tu manera