DevExpress.XtraGrid.Views.Grid 的颜色设置

来源：互联网发布：数据分析就业前景编辑：程序博客网时间：2024/05/18 01:33

DevExpress.XtraGrid的颜色功能

Category:

在GridView事件中添加以下代码:

Imports DevExpress.XtraGrid.Views.Grid
' ...
Private Sub GridView1_RowStyle(ByVal sender As Object, ByVal e As DevExpress.XtraGrid.Views.Grid.RowStyleEventArgs) Handles GridView1.RowStyle Dim view As GridView = sender If (e.RowHandle >= 0) Then Dim category As String = view.GetRowCellDisplayText(e.RowHandle, view.Columns("Category")) If category = "Beverages" Then e.Appearance.BackColor = Color.Salmon e.Appearance.BackColor2 = Color.SeaShell End If End If End Sub

还可以具体选择某几列选择颜色:
Imports DevExpress.XtraGrid.Views.Grid
' ...

Private Sub GridView1_RowCellStyle(ByVal sender As Object, ByVal e As DevExpress.XtraGrid.Views.Grid.RowCellStyleEventArgs) Handles GridView1.RowCellStyle Dim view As GridView = sender If e.Column.FieldName = "Count" Or e.Column.FieldName = "Unit Price" Then Dim category As String = view.GetRowCellDisplayText(e.RowHandle, view.Columns("Category")) If category = "Seafood" Then e.Appearance.BackColor = Color.DeepSkyBlue e.Appearance.BackColor2 = Color.LightCyan End If End If End Sub
对列名为Count和Unit Price的两列显示颜色,其它列不考虑.
(具体详情请查看自带文档中的
ms-help://DevExpress2005/DevExpress.XtraGrid/CustomDocument758.htm)