谢谢。你这个功能也是我想要的。不过,跟我上面的问题不一样。
FG_LIST就是C1Flexgrid
我现在是在
Private Sub DlgQx_Load(sender As Object, e As EventArgs) Handles MyBase.Load
FG_LIST.DrawMode = DrawModeEnum.OwnerDraw
End Sub
Private Sub FG_LIST_OwnerDrawCell(sender As Object, e As C1.Win.C1FlexGrid.OwnerDrawCellEventArgs) Handles FG_LIST.OwnerDrawCell
If LCase(FG_LIST.Cols(e.Col).Name) = "v_m_id" And e.Row > 0 Then
Dim intcj As Integer
intcj = Len(FG_LIST(e.Row, e.Col).ToString())
If intcj = 2 Then
Dim cs As CellStyle = FG_LIST.Styles.Add("back")
cs.BackColor = Color.AliceBlue
cs.ForeColor = Color.MidnightBlue
cs.Font = New Font("Verdana", 10, FontStyle.Bold)
FG_LIST.Rows(e.Row).Style = cs
End If
End If
End Sub
这个是我的源代码。因为我隐藏的列项,我没法通过OwnerDrawCell,。目前我只能变通采用能看到的列项做个判断。
|