以文本方式查看主题 - 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=145319) |
-- 作者:luckbetter333 -- 发布时间:2020/1/16 9:21:00 -- 设置局域网ftp中图片浏览器权限 如题,在afteropenproject 中 Select Case User.group Case "销售部" Dim fl As WinForm.PictureViewer = Tables("产品档案").Cols("产品图").PictureViewer fl.DeleteCommand.Enabled = False fl.ClearCommand.Enabled = False fl.AddCommand.Enabled = False fl.ManagerCommand.Enabled = False fl.SaveAsCommand.Enabled = False End Select 来限制销售部浏览产品图时的权限,不好用,问题出在哪里?
|
-- 作者:有点蓝 -- 发布时间:2020/1/16 9:39:00 -- Select Case User.group Case "销售部" Tables("产品档案").Cols("产品图").OpenWindow Dim fl As WinForm.PictureViewer = Tables("产品档案").Cols("产品图").PictureViewer fl.DeleteCommand.Enabled = False fl.ClearCommand.Enabled = False fl.AddCommand.Enabled = False fl.ManagerCommand.Enabled = False fl.SaveAsCommand.Enabled = False End Select 仅对右边的列窗口有效,对点击按钮弹出的文件管理窗口无效
|
-- 作者:luckbetter333 -- 发布时间:2020/1/16 9:55:00 -- 版主,还是不好用啊,我把表放在窗口里,从窗口打开的表和图片浏览器,是这个原因么?应该怎么办? |
-- 作者:有点蓝 -- 发布时间:2020/1/16 10:06:00 -- 如果在窗口使用,请使用PictureViewer控件:http://www.foxtable.com/webhelp/topics/1894.htm |
-- 作者:luckbetter333 -- 发布时间:2020/1/16 10:12:00 -- 版主,我就是用的这里的代码啊,在帮助文件“设置内置的图片管理器”里的代码。 |
-- 作者:有点蓝 -- 发布时间:2020/1/16 10:35:00 -- 控件要用这个:http://www.foxtable.com/webhelp/topics/2286.htm 而不是去设置列的管理器,看懂每个帮助都是针对什么情况使用的
|
-- 作者:luckbetter333 -- 发布时间:2020/1/16 10:55:00 -- 亲爱的版主,麻烦明确告诉一下怎么改,我想了半天,还是不知道怎么办。实在不好意思。 |
-- 作者:有点蓝 -- 发布时间:2020/1/16 10:58:00 -- 到窗口afterload事件写代码 Dim pv As WinForm.PictureViewer = e.Form.Controls("PictureViewer1")
pv.DeleteCommand.Visible = False pv.ClearCommand.Visible = False |
-- 作者:luckbetter333 -- 发布时间:2020/1/16 11:07:00 -- 版主你好,我刚才没说清楚,我没有把图片浏览器做到窗口里,我只是把产品档案这个表做成了窗口。 |
-- 作者:有点蓝 -- 发布时间:2020/1/16 11:13:00 -- 我也说的很清楚了:如果在窗口使用,请使用PictureViewer控件:http://www.foxtable.com/webhelp/topics/1894.htm,而不是使用内置的管理窗口 |