Mensaje    Asunto: Color de fondo de una fila del TListView Responder citando

Hola compañeros,

Hace tiempo les pedí apoyo para pintar las líneas horizontales del listivew como lo hace el outlook, el gran _Leo ( como siempre ) me proporcionó el código, ahora le agregué unas variantes, el fondo de las filas.

Cuando pinto el fondo de una fila y esta tiene una imagen, no me pinta el fondo del area donde se encuentra la imagen, ¿¿¿ alguien le ha pasado ???

les anexo el código que utilizo.

Saludos y gracias.

[code]

void __fastcall TForm4::ListView1AdvancedCustomDrawItem(TCustomListView *Sender,
TListItem *Item, TCustomDrawState State, TCustomDrawStage Stage,
bool &DefaultDraw)
{
div_t x;

x = div(Item->Index,2);

if (Stage == cdPrePaint || Stage == cdPostPaint)
{
TRect r = Item->DisplayRect(drBounds);
if ( x.rem == 0 )
Sender->Canvas->Brush->Color = clWhite;
else
Sender->Canvas->Brush->Color = 0xFFEFE3;
Sender->Canvas->Pen->Color = (TColor)0xCF9365;
Sender->Canvas->MoveTo(r.Left, r.Bottom-1);
Sender->Canvas->LineTo(r.Right, r.Bottom-1);
}
}

[/code]