MUDANDO A COR DE LINHAS NO LISTVIEW

FLAVIOGUILHERME 26/04/2007 17:09:10
#213918
Boa tarde amigos !!!
Estou querendo mudar a cor de algumas linhas do ListView, isso vai depender do que existir em um determinado campo do listview, alguém sabe como fazer isso ?
Obrigado a todos.
NETMANIA 26/04/2007 17:19:54
#213922
Ola Flavio

Eu criei uma função que faz o MSFlexGrid ficar zebrado, com um pouco de ajustes, ele pode antender as suas necessidades.

Public Function flexGridColorido(msFlexGrid As Object)

'Declaração das variáveis
Dim lngLinha As Long

msFlexGrid.FillStyle = flexFillRepeat

For lngLinha = 1 To msFlexGrid.Rows - 1

With msFlexGrid

.Row = lngLinha

If verificaImpar(lngLinha) Then 'Se a linha for impar:

.Col = 0 'Seleciona a partir da primeira coluna
.ColSel = .Cols - 1 'Seleciona até a última coluna
.CellBackColor = &HE0E0E0 'Aplica a cor

Else 'Se a linha for par:

.Col = 0 'Seleciona a partir da primeira coluna
.ColSel = .Cols - 1 'Seleciona até a última coluna
.CellBackColor = &HFFFFFF 'Aplica a cor

End If

End With

Next

msFlexGrid.FillStyle = flexFillSingle

End Function

FLAVIOGUILHERME 26/04/2007 17:42:40
#213924
Obrigado pela dica amigo NETMANIA.
Vou mudar para esse componente.
DANIELCPAETE 27/04/2007 12:15:54
#214037
Resposta escolhida
Bom cara não é por nada não mas eu prefiro 1000 vezes o listview do que o msflexgrid para listar dados mas isso é apenas uma opnião pessoal minha

o que você poderia fazer para alterar as cores do listview seria utilizar um simples função que combina o fundo do listview com uma picture segue um exemplo bem simples para você dar uma olhada


Tópico encerrado , respostas não são mais permitidas