jseclen
16 de Julio del 2004

Holas otra vez,

Quisiera saber como resaltar o cambiar el background de determinadas filas de un dbgrid ..

Es que quisiera darle un color distinto cuando ese registro cumpla una determinada caracteristica.

Saludos..

tecniCam
16 de Julio del 2004

Esto es un poco complicado y lleva varios procedimientos.

Cuando se cumpla la condici贸n que sea y se pulse u ocurra cualquier evento llama a este procedimiento y ponle a cada cosa su nombre.

Esto cambia el color de la fila especificada, igual puedes hacer con la columna, con la celda, etc. s贸lo usa las propiedades del Grid (msh).

Sub PintarFila(fila As Integer)

Dim i As Integer


For i = 0 To msh.Cols - 1
With msh
If msh.Tag <> -1 Then
.col = i
.Row = msh.Tag
.CellBackColor = &HC0FFFF 'RGB(249, 250, 222)
.CellForeColor = RGB(205, 89, 20)
End If

If fila <> -1 Then
.col = i
.Row = fila
.CellBackColor = &HFFFFFF
.CellForeColor = RGB(1, 1, 1)
End If
End With
Next

msh.Tag = fila
End Sub