Re: color de filas en datagrid

23/05/2006 - 18:04 por sagma | Informe spam
Hola que tal, saben pille esto un poco mas abajo, el mismo LMB, lo escribio, pero aun no me muestra nada, esto es lo que he puesto

Public Class DGTxtColColo

Inherits DataGridTextBoxColum

Private mColorFondoCondicion As Colo

Protected Overloads Overrides Sub Paint(ByVal g As System.Drawing.Graphics,
ByVal bounds As System.Drawing.Rectangle,
ByVal source As System.Windows.Forms.CurrencyManager,
ByVal rowNum As Integer,
ByVal backBrush As System.Drawing.Brush,
ByVal foreBrush As System.Drawing.Brush,
ByVal alignToRight As Boolean

Dim oBrush As SolidBrus
Dim ofiladatos As DataRowView = source.List(rowNum

If ofiladatos("rhcondes1") = "BAJA" The
oBrush = New SolidBrush(Color.Cyan
Els
oBrush = backBrus
End I
'Select Case rowNu
'Case 1, 3, 7,
'oBrush = New SolidBrush(Color.Aquamarine
'oBrush = New SolidBrush(mColorFondoCondicion
'Case Els
'oBrush = backBrus
'End Selec

MyBase.Paint(g, bounds, source, rowNum,
oBrush,
foreBrush,
alignToRight
End Su

End Clas

no me da ningun error, pero no lo muestra como era el otro, cuando le ponia, lo que esta comentado

gracia

sagma

Ver este tema: http://www.softwaremix.net/viewtopic-516825.htm

Enviado desde http://www.softwaremix.net
 

Leer las respuestas

#1 Luis Miguel Blanco
24/05/2006 - 08:22 | Informe spam
Hola sagma

Acabo de revisar este código y a mí me funciona correctamente. Lo que
hacemos aquí es obtener el número de fila que el datagrid va a "pintar", a
continuación, utilizando dicho número de fila, extraemos la correspondiente
fila del dataset que tenemos conectado al grid, en forma de datarowview, y
por último usamos este datarowview para comprobar el valor de uno de sus
campos; en el caso de que se cumpla la condición, cambiamos el color de fondo
de la celda.

Puede ser que te falte algo en la creación de los objectos columna que luego
asignas al estilo del grid. Revisa esta parte y compárala con la del ejemplo
original, en la que también incluí dicha creación de las columnas, grid,
dataset, etc; quizá sea aquí donde está el problema.
Un saludo
Luis Miguel Blanco
http://www.dotnetmania.com


"sagma" wrote:


Hola que tal, saben pille esto un poco mas abajo, el mismo LMB, lo escribio, pero aun no me muestra nada, esto es lo que he puesto:

Public Class DGTxtColColor

Inherits DataGridTextBoxColumn

Private mColorFondoCondicion As Color

Protected Overloads Overrides Sub Paint(ByVal g As System.Drawing.Graphics, _
ByVal bounds As System.Drawing.Rectangle, _
ByVal source As System.Windows.Forms.CurrencyManager, _
ByVal rowNum As Integer, _
ByVal backBrush As System.Drawing.Brush, _
ByVal foreBrush As System.Drawing.Brush, _
ByVal alignToRight As Boolean)

Dim oBrush As SolidBrush
Dim ofiladatos As DataRowView = source.List(rowNum)

If ofiladatos("rhcondes1") = "BAJA" Then
oBrush = New SolidBrush(Color.Cyan)
Else
oBrush = backBrush
End If
'Select Case rowNum
'Case 1, 3, 7, 8
'oBrush = New SolidBrush(Color.Aquamarine)
'oBrush = New SolidBrush(mColorFondoCondicion)
'Case Else
'oBrush = backBrush
'End Select

MyBase.Paint(g, bounds, source, rowNum, _
oBrush, _
foreBrush, _
alignToRight)
End Sub

End Class

no me da ningun error, pero no lo muestra como era el otro, cuando le ponia, lo que esta comentado.

gracias


sagma


Ver este tema: http://www.softwaremix.net/viewtopic-516825.html

Enviado desde http://www.softwaremix.net



Preguntas similares