以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 请问关于列显示设置方法。 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=47480) |
-- 作者:ndxfke -- 发布时间:2014/3/11 10:35:00 -- 请问关于列显示设置方法。 我有个"单价管理"表,表里有个“单价“字段; 当用户权限不具备时,这列数据显示为"***"号。 |
-- 作者:Bin -- 发布时间:2014/3/11 10:38:00 -- 在DrawCell事件处理. if e.col.name="单价" then if user.Group <> "XXX" then e.text="***" end if end if
|
-- 作者:ndxfke -- 发布时间:2014/3/11 10:44:00 -- sorry,表述不当. 我是想实现,在内部函数里,. 当用户权限不够时,这个"单价"字段的值(包括后续加载进来的值),都以掩码的方式显示; 权限够的用户进来时,又显示为预设的值; [此贴子已经被作者于2014-3-11 10:44:17编辑过]
|
-- 作者:Bin -- 发布时间:2014/3/11 10:44:00 -- 就是这么处理啊. |
-- 作者:ndxfke -- 发布时间:2014/3/11 10:50:00 -- 函数里指定不能用e, 以下是我写的这段,帮指正下. If Typeof wc Is winform.Table Then Dim tb As winform.Table = wc For cl As Integer = 0 To tb.Table.Cols.Count -1 If tb.Table.Cols(cl).Name ="单价" Then tb.Table.Cols(tb.Table.Cols(cl).Name).text = "***" \'---- 写的过程中,找不到text属性 End If Next End If
|
-- 作者:Bin -- 发布时间:2014/3/11 10:52:00 -- 楼主,你没有认真看我的回复吧. 别人指导你,认真看完别人的回复,是最起码的尊重啊. 一扫而过的学习态度要不得. |
-- 作者:ndxfke -- 发布时间:2014/3/11 10:55:00 -- 岂敢.. 岂敢.. 你是让写在事件里嘛,我是说,写在内部函数里. 不会只这一种办法吧.
|
-- 作者:Bin -- 发布时间:2014/3/11 11:06:00 -- 只能写在事件里 |
-- 作者:ndxfke -- 发布时间:2014/3/11 11:07:00 -- 懂了, so,没有不认真对待你的耐心指导吧. |