Pintar Linhas CxGrid

Delphi

08/01/2013

Olá Amigos preciso de uma mãozinha.. gostaria de saber como pintar as linhas da cxGrid de modo que fique intercalado .?
para pintar estou usando o seguinte código só não sei qual condição coloco ali no if para que ele pinte da forma desejada..

ACanvas.Canvas.Brush.Color := clGreen;
ACanvas.Font.Color := clBlack

verde |------
vermelho |------
verde |------
vermelho |------
verde |------
Eduardo

Eduardo

Curtidas 0

Melhor post

Daniel Santos

Daniel Santos

08/01/2013

CxGrid e chato pra isso mesmo

No metodo CustomDrawCell

Valor := VarAsType( cxGrid1DBTableView1.ViewData.Records[AViewInfo.GridRecord.Index].Values[ cxGrid1DBTableView1Colua.Index], varString );

if Valor = 'A' then
Acanvas.Font.Color := clGreen
else
Acanvas.Font.Color := clRed;

GOSTEI 1

Mais Respostas

Joel Rodrigues

Joel Rodrigues

08/01/2013

Se for só para alterar o estilo da linha sem depender de um valor, como o amigo sugeriu acima, você pode ir nos Styles da GridView.
Selecione a View ativa da cxGrid, vá na propriedade Styles e defina um estilo para as subpropriedades ContentEven e ContentOdd.
Boa sorte.
GOSTEI 0
Eduardo

Eduardo

08/01/2013

Opa Obrigado .. deu certo
GOSTEI 0
POSTAR