关键的东西看下面的计算式。
form2.left=form1.left-form2.width '计算窗体2的水平位置 窗体2的左辺位置=窗体1的左辺减掉窗体2的宽度
form2.top=form1.top '窗体2和窗体1的top一样。(显示器顶部到窗体标题栏的距离一样)
移动时同时移动就是用Timer控制吧、如果窗体2可见就运行上面同歩代码(对窗体2的left和Top进行时刻调整)Timer的Interval=100 (毎秒同歩10次、毎100Ms同歩一次)
弹出窗体2后,再次按下该按钮后,窗体2隐藏或消失。这个又该怎么写呢?
用下面的代码切换窗体2的可视属性。
if form2.visible=true then
form2.visible=false
else
form2.visible=true
endif
题主说的是哪种类似千千静听的磁性窗体吧?歌词面板跟播放列表“粘”在一起的那种。
wgdwdy 所言确实是一种方法,不过效率太低,需要放置若干的 Timer 控件反复计算,可能会占用大量系统资源。
题主可以参考这篇 http://www.cnblogs.com/rooly/articles/1909979.html