通过鼠标拖入FileManager 作为新增文件的例子 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 通过鼠标拖入FileManager 作为新增文件的例子

共有1600人关注过本帖树形打印复制链接主题：通过鼠标拖入FileManager 作为新增文件的例子

ljh29206

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1359 积分：12004 威望：0 精华：0 注册：2012/3/5 11:32:00

通过鼠标拖入FileManager 作为新增文件的例子 发帖心情

Post By：2017/1/5 12:30:00 [只看该作者]

如题

请教有没有

通过鼠标拖入FileManager 作为新增文件的例子

有点色

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/1/5 14:17:00 [只看该作者]

那你就必须给fileManager绑定事件了。

参考

下载信息 [文件大小：296.0 KB 下载次数：16]
点击浏览该文件:文件拖拽.table

获取listbox控件，然后帮其绑定拖拽事件

Dim lbx As Windows.Forms.ListBox = e.Form.Controls("FileManager1").basecontrol.Controls("SplitContainer1").panel1.Controls("ListBox1")

ljh29206

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1359 积分：12004 威望：0 精华：0 注册：2012/3/5 11:32:00

Post By：2017/1/5 17:53:00 [只看该作者]

Public Sub picture_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs)

Dim paths As object() = e.Data.GetData(Windows.Forms.DataFormats.FileDrop)

Dim fm As WinForm.FileManager

Dim frm = Windows.Forms.Form.ActiveForm

If frm IsNot Nothing Then

If frm.controls.contains("FileManager1") Then

fm = frm.Controls("FileManager1")

End If

For Each path As object In paths

fm.AddFile(path)

sender.Cursor = System.Windows.Forms.Cursors.IBeam

End Sub

直接判断某个窗体已经可以添加文件进去了，

但是判断当前窗体后再添加进去不行，请教这样写哪里错了

有点色

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/1/5 18:33:00 [只看该作者]

给lbx绑定拖拽事件啊

Dim lbx As Windows.Forms.ListBox = e.Form.Controls("FileManager1").basecontrol.Controls("SplitContainer1").panel1.Controls("ListBox1")

然后，在事件里面，直接给某表的当前行直接添加数据即可

ljh29206

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1359 积分：12004 威望：0 精华：0 注册：2012/3/5 11:32:00

Post By：2017/1/6 9:42:00 [只看该作者]

色板，

"FileManager1"

通过 "FileManager1" .BindingField

能够返回 “ 表.列”

请问 “表.列” 设置为文件列，怎么返回表.列（这个文件列）的存放目录

[此贴子已经被作者于2017/1/6 9:42:22编辑过]

有点色

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/1/6 9:56:00 [只看该作者]

1、你能直接获取这个fileManager对象吗？不可以通过绑定的事件直接获取到的。

2、你与其要这样，还不如在绑定的时候，就用变量去记录一下对应的列是什么。

3、你可以这样写，首先分割得到表列，然后DataTables("表").DataCols("列").DefaulFolder

ljh29206

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1359 积分：12004 威望：0 精华：0 注册：2012/3/5 11:32:00

Post By：2017/1/6 10:07:00 [只看该作者]

可以的试过了，但需要处理路径，放进去的路径

如： “c:\122\132\45.txt”

要先把这个文件复制到列自定的存放位置，再向列添加 45.txt 的文本哇

不能 “c:\122\132\45.txt” 就这样添加进去

[此贴子已经被作者于2017/1/6 10:09:28编辑过]

下一主题 >> << 上一主题

主题：通过鼠标拖入FileManager 作为新增文件的例子