- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- textbox控件权限 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=31877)
-- 发布时间：2013/4/22 13:24:00
-- textbox控件权限
窗口中有很多个textbox，绑定在订单表的不同的列，有一个列用户名，如果登录者与该行创建的用户名一致，则textbox的内容可以编辑，否则不可以编辑。但是窗口中有几个单独的textbox不受任何登录着影响，都可以编辑。调试很久还是不成功。
现在简单做个例子，请高手指点下。
谢谢！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:textbox权限.table |
[此贴子已经被作者于2013-4-22 13:35:52编辑过]
-- 发布时间：2013/4/22 13:48:00
--
窗口事件afterload中设置代码：
if tables（"xxx").current（”用户名“）<> user.name then
e.form.controls("textbox").readonly = BooleanEnum.True \'设置只读属性
end if
-- 发布时间：2013/4/22 13:55:00
-- 回复：（ericsky）窗口事件afterload中设置代码：if t...
我的意思是张三登录的时候，张三可以修改张三录入的行，而不可以修改李四录入的行。谢谢！
-- 发布时间：2013/4/22 14:03:00
--
-- 发布时间：2013/4/22 14:09:00
--
在表事件 currentchanged 设置：
If e.Table.Rows.count > 0 Then
If Forms("录入").opened Then
If e.Table.current("用户名") <> user.name Then
forms("录入").controls("textbox5").ReadOnly =BooleanEnum.True
Else
forms("录入").controls("textbox5").ReadOnly =BooleanEnum.False
End If
End If
End If
-- 发布时间：2013/4/22 14:25:00
--
谢谢ericsky，OK了。虽然有点繁琐，要每个控件都去申明，但是总算打到目的了。
再次感谢！
-- 发布时间：2013/4/22 16:28:00
--
谢了天问