通过MediaPlayer控件对象播放Mp3文件。使用SetWindowRgn函数，使窗体呈现不规则形状。-Mp3 player through the MediaPlayer control object file. Use SetWindowRgn function, so that form irregular shapes.

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