以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  控件移动问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=4641)

--  作者:qtcks
--  发布时间:2009/10/16 15:35:00
--  控件移动问题
窗口1中有2个Panel面板(Panel1、Panel2)
如何将Panel1中的按钮控件,移动到Panel2中?或移出Panel1,放到form中

--  作者:qtcks
--  发布时间:2009/10/16 15:39:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq截图未命名.jpg
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2009/10/16 15:42:00
--  
好像没有这个功能。
不过你可以在Panel1删除一个,在Panel2创建一个同名的
--  作者:qtcks
--  发布时间:2009/10/16 15:47:00
--  
图片点击可在新窗口打开查看正准备这么做呢,太麻烦了,

--  作者:czy
--  发布时间:2009/10/16 15:54:00
--  
在Panel1中用鼠标按住一控件往Panel2中拖动,这样不行吗?
--  作者:狐狸爸爸
--  发布时间:2009/10/16 16:07:00
--  
不好意思,是可以移动的,我测试通过

e.Form.Controls("GroupBox2").AddControl(e.Form.Controls("Button1"))

上面的代码将Button1移到GroupBox2

--  作者:qtcks
--  发布时间:2009/10/17 12:57:00
--  

折腾了一天了,还是没弄起来,
感谢狐爸的代码
但是,在动态获取“合集”与“控件”的来源上,出现偏差
在控件上按下鼠标,移动鼠标到新合集,
松开鼠标。
获得的值都是控件名称,
采用鼠标移动事件,又出现偏差,点击案件,移动鼠标,就可以使控件在不同合集中移动。

但总觉得不合适。希望大家帮助


--  作者:程兴刚
--  发布时间:2009/10/18 8:34:00
--  

做一个简单的示例文件,告知您想要的效果。


--  作者:czy
--  发布时间:2009/10/18 11:50:00
--  


以下是引用qtcks在2009-10-17 12:57:00的发言:


在控件上按下鼠标,移动鼠标到新合集,
松开鼠标。
获得的值都是控件名称,


可以获得控件的位置啊,看下面的图片


图片点击可在新窗口打开查看此主题相关图片如下:qq截图未命名.jpg
图片点击可在新窗口打开查看

或许你的代码应该改成这样:

Dim Bt As WinForm.Button = e.Form.Controls("Button1")
Bt.Left = 30 \'输入你想要的值
Bt.Top = 30 \'输入你想要的值
e.Form.Controls("GroupBox2").AddControl(Bt)

--  作者:yangming
--  发布时间:2009/10/18 11:57:00
--  
楼主到底是什么意思,不清楚,还是上传一个示例吧