以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 通过鼠标拖入FileManager 作为新增文件的例子 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=94917) |
||||
-- 作者:ljh29206 -- 发布时间:2017/1/5 12:30:00 -- 通过鼠标拖入FileManager 作为新增文件的例子 如题 请教 有没有 通过鼠标拖入FileManager 作为新增文件的例子 |
||||
-- 作者:有点色 -- 发布时间:2017/1/5 14:17:00 -- 那你就必须给fileManager绑定事件了。
参考
获取listbox控件,然后帮其绑定拖拽事件
Dim lbx As Windows.Forms.ListBox = e.Form.Controls("FileManager1").basecontrol.Controls("SplitContainer1").panel1.Controls("ListBox1") |
||||
-- 作者:ljh29206 -- 发布时间: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 End If For Each path As object In paths fm.AddFile(path) Next sender.Cursor = System.Windows.Forms.Cursors.IBeam End Sub 直接判断某个窗体 已经可以 添加文件进去了, 但是判断当前窗体 后再添加 进去不行, 请教这样写哪里错了
|
||||
-- 作者:有点色 -- 发布时间:2017/1/5 18:33:00 -- 给lbx绑定拖拽事件啊
Dim lbx As Windows.Forms.ListBox = e.Form.Controls("FileManager1").basecontrol.Controls("SplitContainer1").panel1.Controls("ListBox1")
然后,在事件里面,直接给某表的当前行直接添加数据即可
|
||||
-- 作者:ljh29206 -- 发布时间:2017/1/6 9:42:00 -- 色板, "FileManager1" 通过 "FileManager1" .BindingField 能够返回 “ 表.列” 请问 “表.列” 设置为文件列, 怎么 返回 表.列(这个文件列) 的 存放目录
[此贴子已经被作者于2017/1/6 9:42:22编辑过]
|
||||
-- 作者:有点色 -- 发布时间:2017/1/6 9:56:00 -- 1、你能直接获取这个fileManager对象吗?不可以通过绑定的事件直接获取到的。
2、你与其要这样,还不如在绑定的时候,就用变量去记录一下对应的列是什么。
3、你可以这样写,首先分割得到表列,然后DataTables("表").DataCols("列").DefaulFolder |
||||
-- 作者:ljh29206 -- 发布时间:2017/1/6 10:07:00 -- 可以的 试过了 ,但 需要 处理 路径, 放进去 的 路径 如: “c:\\122\\132\\45.txt” 要先把 这个文件 复制到 列自定的 存放位置 , 再向 列添加 45.txt 的文本哇 不能 “c:\\122\\132\\45.txt” 就这样添加进去 [此贴子已经被作者于2017/1/6 10:09:28编辑过]
|