Al usar TCanvas perdi la selección !!!

[ecfisa]

Hola.

Te agrego un ejemplo más completo, en el cuál seleccionás los colores de fondo y fuente en ambos casos (par/impar):

void __fastcall TForm1::DBGrid1DrawColumnCell(TObject *Sender,
      const TRect &Rect, int DataCol, TColumn *Column, TGridDrawState State)
{
  if (ADOQuery1->RecNo % 2) {
   DBGrid1->Canvas->Font->Color = clBlack;  /* letra negra */
   DBGrid1->Canvas->Brush->Color =  clLime; /* fondo claro */
  }
  else{
   DBGrid1->Canvas->Font->Color = clWhite;  /* letra blanca */
   DBGrid1->Canvas->Brush->Color =  clNavy; /* fondo oscuro */
  }
  DBGrid1->DefaultDrawColumnCell(Rect,DataCol,Column,State);
}

Saludos.