如何实现内容显示的左右飞入飞出
如题，希望用TPanel与TGroupBox组合，实现向powerpoint那样的左右飞出的显示；
将TGroupBox组件放置TPanel上，点击“上一页”当前TGroupBox2向右飞出TGroupBox1显示，点击“下一页”当前TGroupBox2向左飞出，TGroupBox3显示；
现在利用TGroupBox的visible属性来进行控制，感觉太生硬，求解决！
[解决办法]
visible 不合适，移动left，
left = left+10
...
[解决办法]
用一个timer
Timer->Interval = 1;
在OnTimer时间里写GroupBox1->Left = GroupBox1->Left + 10;...
[解决办法]
楼上用定时器的解决方法倒是不错，不知道楼主的飞来飞去要不要什么特效
[解决办法]
定时器里面设置GroupBox组件的位置，可以实现动态效果
[解决办法]
需以位置比距理才平...必要可戴入簧效就更棒了......