以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 求助 文件管理器 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=122613) |
-- 作者:jackyfashion -- 发布时间:2018/7/29 23:03:00 -- 求助 文件管理器 老师: 您好! 我有一个文件管理器,已绑定"纸样文件"列 是扩展为多文件 CommandVisible 逻辑型,是否在FileManager的底端显示增加、删除、清除、打开等命令。 我有个Button,在Click代码,什么代码可以像 底端"增加"按钮,同样的功能 同时增加多文件,文件管理器可同时显示多个文件? 请老师指教!!! 谢谢!!! [此贴子已经被作者于2018/7/29 23:06:28编辑过]
|
-- 作者:有点甜 -- 发布时间:2018/7/30 0:40:00 -- 参考
http://www.foxtable.com/webhelp/scr/2697.htm
|
-- 作者:jackyfashion -- 发布时间:2018/7/30 21:21:00 -- 谢谢老师!!! 谢谢!!!
|
-- 作者:jackyfashion -- 发布时间:2018/7/30 21:50:00 -- 老师: 你好! 文件管理器能设置BackColor 请指教!!! 谢谢!
|
-- 作者:有点蓝 -- 发布时间:2018/7/30 21:53:00 -- 不能 |
-- 作者:jackyfashion -- 发布时间:2018/7/30 22:45:00 -- 好的,谢谢! |
-- 作者:有点甜 -- 发布时间:2018/7/31 9:15:00 -- 以下是引用jackyfashion在2018/7/30 21:50:00的发言:
老师: 你好!
文件管理器能设置BackColor
请指教!!!
谢谢!
参考
Dim lbx As object = e.Form.Controls("FileManager1").basecontrol.Controls("SplitContainer1").panel1.Controls("ListBox1") lbx.backcolor = color.red |
-- 作者:jackyfashion -- 发布时间:2018/7/31 21:45:00 -- 老师: 您好! 下面的代码: Dim
dlg As New OpenFileDialog Dim flm As WinForm.FileManager = e.Form.Controls("FileManager1") dlg.Filter= "Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb" If dlg.ShowDialog = DialogResult.OK Then flm.AddFile(dlg.FileName) End If 如果FileManager有同名的文件,我要覆盖或返回,请问加什么代码? 谢谢老师!
|
-- 作者:有点蓝 -- 发布时间:2018/7/31 21:58:00 -- 这个要通过绑定的单元格进行判断 If dlg.ShowDialog = DialogResult.OK Then Dim r As Row = Tables("订单").Current For Each s As String in r.DataRow.Lines("文件列") If s = dlg.FileName Then msgbox("文件重复") Else flm.AddFile(dlg.FileName) End If Next End If |
-- 作者:jackyfashion -- 发布时间:2018/7/31 22:02:00 -- 谢谢老师!!! 谢谢!!!
|