300分,讨论像Winamp具有磁性的可拖动几个窗体的问题 (300分)

  • 主题发起人 主题发起人 lfpsoft
  • 开始时间 开始时间
我也一样。:)
学习学习,给一份。
nmks2000@sina.com
 
我的目的就是想修改FormMagnet的源代码以达到我的目的。
以上各位要的源代码我都已发,请大家帮帮忙。
 
这个应该比较简单,在窗口拖动时判断几个窗口的位置
距离较小则自动调整位置
 
这么简单的我也做不了呀!
 
没有人对这个问题有兴趣了?
 
可以也给我一份吗?wangyagn_wy@10mail.net
 
有意思,我也想要一份,麻烦你了.
z-s-d@163.com
 
方便的话也给我一份
cxz@gsta.com
 
明天再给们你
 
据我观察,好象在 MouseDown 事件里直接获取两个(或三个) WindowRect 和判断是否是
吸合的 ,在 MW_Move 中判断吸合或各窗体的接近程度,如果是吸合的,就直接根据
主窗体的移动修改各窗体自己的移动,如果没吸合,根据相互的间距做出反应。并且在
移动中,只有主窗体的移动,吸合窗体才跟着移动,其他窗体的移动,不带动主窗体。
如果是这样,程序就应该可以编了。吸合并移动的范例我看到过,当时看了觉的并不是
太难,就放到一边了,现在却找不到了。
 
小雨哥,我有这个控件的源代码,你要看看吗?
 
怎么没人公布原代码
ty_unix@163.com
 
以上留有Email的我都已把代码发过去了。
 
playicq.com 发布一个么,兄弟。
 
需要的留下EMAIL吧!
研究了向天,还是没有什么结果
不知各位怎样呢?
该不会是拿了控件就不帮我看了吧?
 
没时间啊,有时间看看学习学习。
 
高手进来吧!
 
呵呵 方便的话,我也要来一份看看:jrqjrq@sina.com 多谢。
 
唉,要了控件就不帮我了,惨呀!
 
谢谢 lfpsoft 的好意,我不要控件,这段时间我没什么空。大约大家和我一样吧。
我在上面已经大致说了,你这样做:
定义一个类似 WM_NCLBUTTONDOWN 的消息
procedure WMNCLButtonDown(var Msg :TWMNCLButtonDown);message WM_NCLBUTTONDOWN;
在这个消息里判断我前面说的各个 Form 的尺寸和接近程度,并作出记号(分离或粘连)。
但这个过程不判断是否需要对齐边界,对齐边界放到 Move 消息里处理。在 Move 消息中
根据刚才给出的记号作出处理,结束时清除记号。
由于主窗体和辅助窗体在同样消息中有细微的行为差异,所以你需要合理安排各自的动作。
 

Similar threads

D
回复
0
查看
825
DelphiTeacher的专栏
D
D
回复
0
查看
831
DelphiTeacher的专栏
D
D
回复
0
查看
664
DelphiTeacher的专栏
D
后退
顶部