[delphi]磁性窗体类，窗体跟随，窗体对齐（类似千千静听）

下面又是翻译： 韩国人 Silhwan Hyun 改写。 TMagnetic Class 是一个 Delphi 版本的"cMagneticWnd" 类， Visual Basic "cMagneticWnd" 为 Emil Weiss 所写. TMagnetic Class 让应用程序的每个窗体有磁性的相互粘在一起, 并可以一起拖动。 当子窗体改变尺寸大小时可以象 Winamp 的窗体一样控制对齐效果. --------------------------------------------- 此 TMagnetic 类支持 Delphi 4/5/7/2005/2006/2007/2009 “模仿实例”目里面是我添蛇画足的加进去的。