- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请问，如何设置FTP列“管理"事件的权限？见下图 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=87471)
-- 发布时间：2016/7/12 14:39:00
--
把管理按钮隐藏
代码写到计划管理去
Dim frm = windows.forms.form.activeform
If frm IsNot Nothing Then
If frm.Text = "文件管理器" Then
Dim obj = frm.Controls("FileManager").Controls("SplitContainer1").panel2.Controls("FlowLayoutPanel1")
obj.controls("Manager").Visible = False
\'Add
\'Folder
\'Open
\'Delete
\'Clear
\'Manager
\'SaveAs
\'Connect
\'FullView
End If
End If
-- 发布时间：2016/7/16 14:02:00
--
没有
-- 发布时间：2016/7/16 15:12:00
--
只能，看2楼
-- 发布时间：2016/7/19 1:24:00
--
当然，列窗口（列文件管理器）不是弹出式，是停靠的；相比起来，弹出式的窗口更友好些。
弹出式窗口在表事件BeforeAddFile和BeforeDeleteFile中，已经可以设计上传和删除的权限，那么这个”管理“按钮，如果也能通过事件设置权限，就好了。
你可以自己做一个窗口，然后加入FileManager控件，然后直接在afterLoad事件写代码控制就好。
-- 发布时间：2016/8/18 18:24:00
--
请问，如果是图片管理器，如何修改二楼的代码？
-- 发布时间：2016/8/18 20:48:00
--
参考
http://www.foxtable.com/webhelp/scr/2470.htm
Select Case e.Col.Name
Case "承包资质" \'对多文件类型才需要这样
e.Cancel = True
e.Col.OpenWindow()
Dim fm As WinForm.PictureViewer = e.Col.PictureViewer
If user.Type <> UserTypeEnum.Developer And user.Type <> UserTypeEnum.Administrator Then
fm.ManagerCommand.enabled = False
Else
fm.ManagerCommand.enabled = True
End If
End Select
-- 发布时间：2017/11/4 16:31:00
--
此主题相关图片如下：7.png
上传：
此主题相关图片如下：6.png