Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
SetColVisible
设置指定列是否可见。
语法:
SetColVisible(ColName, Visible)
ColName: 列名称
Visible: 逻辑型,是否可见。
示例
隐藏金额列
Dim
dst As WinForm.DataList = e.Form.Controls("DataList1")AddUserStyle(Name,BackColor,ForeColor)
Name: 样式名称
BackColor: 背景颜色
ForeColor: 字体颜色
DataList的DrawCell事件在绘制单元格的时候执行,该事件的e参数属性有:
Form: 触发事件的窗口
Sender: 触发事件的控件
DataRow: 正在绘制的数据行
ColName: 正在绘制的列的名称
Style: 用于绘制单元格的样式名称
DrawCell
在绘制单元格的时候执行。
e参数属性有:
Form: 触发事件的窗口
Sender: 触发事件的控件
DataRow: 正在绘制的数据行
ColName: 正在绘制的列的名称
Style: 用于绘制单元格的样式名称
示例
假定DataList用于显示订单数据,我们希望对于大于5000的金额,用红底蓝字标出,对于大于4000的金额,用蓝底白字标出。
首先在窗口的AfterLoad事件中设置代码,增加两个样式:
Dim
dst As WinForm.DataList = e.Form.Controls("DataList1")然后将DataList的DrawCell事件设为:
If
e.ColName = "金额" Then示例二
DrawCell事件不仅用于标记数据,还可以用他“篡改”数据。
假定有一名为“密码”的列,要求只有经理级别的用户才能查看该列的数据,其他人查看的时候,看到的只是"****"。
实现的代码也非常简单,在该表的DrawCell事件中输入:
If User.Group = "经理" Then '如果是经理
Return '那么返回,正常显示数据
End If
If e.Col.Name = "密码" Then '如果正在绘制的是密码列
e.Text = "****" '那么用*代替原来的内容
End IF
DrawCell事件只是影响显示内容,并不会对真实的值有任何影响。