Delphi滑动效果,创建不规则窗体界面，点击按钮收缩实现滑动效果-Delphi sliding effects, create irregular form interface, click the button contraction sliding effect