[delphi]磁性窗体类，窗体跟随，窗体对齐（类似千千静听/winamp），这个是模拟最好的类了（非控件）。