- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 如何用鼠标拖拽标签或者图片 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=77811)
-- 发布时间：2015/11/25 20:22:00
-- 如何用鼠标拖拽标签或者图片
见附件 ， 需要把 一个label 从 来源panel 用鼠标 拖到 目的地 panel 不知道如何实现
-- 发布时间：2015/11/25 20:25:00
--
参考 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=49697&skin=0
-- 发布时间：2015/11/25 20:50:00
--
这个有点不一样， 我希望 不是 点击 在 另外 一个 PANEL 里面生产， 是希望从一个panel drag 到 另外一个panel 过去， 好像 需要用到 DragEnter ,ItemDrag, dragdrop 但是不知道如何来处理
-- 发布时间：2015/11/25 21:39:00
--
如下
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:dragdrop.foxdb |
-- 发布时间：2015/11/26 8:44:00
--
多谢，移过去后相当于完全使用了原来控件的 LEFT, TOP ， 能否移动到 鼠标 点的 坐标 。 这个 事件，发生在mouseup 之前， 获取不了 E.X, EY， 请问如何实现。
-- 发布时间：2015/11/26 10:16:00
--
代码
Dim sender = args(0)
Dim e = args(1)
Dim item = e.Data.GetData(e.Data.GetFormats()(0))
Dim dp As Point = sender.PointToClient(Windows.Forms.Cursor.Position)
item.basecontrol.left = dp.X
item.basecontrol.Top = dp.Y
sender.controls.add(item.basecontrol)
-- 发布时间：2015/11/26 12:29:00
--
多谢