Bueno, a ver si te puede ayudar esto un poco:
Para poder pintar las filas del DBGrid, lo tienes que hacer por medio del evento OnDrawDataCell y con el Canvas.
Yo estuve experimentado un poco por aqui, igual es la primera vez que lo intento, pero bueno rústicamente lo que hice fue esto:
Dentro del evento OnDrawDataCell...
Código:
genero=Table1->FieldValues["Genero"]; //"genero" es un String, lo usé para poder compararlo con palabras... ^_^ˇ
if(genero=="Romance")
{
DBGrid1->Canvas->Brush->Color=clRed; //Lo coloreo de rojo si es romance
}
else if(genero=="Suspenso")
{
DBGrid1->Canvas->Brush->Color=clGreen; //Si es Suspenso, entonces verde
}
else if(genero=="Comedia")
{
DBGrid1->Canvas->Brush->Color=clYellow; //Si es Comedia, amarillo
}
else
{
DBGrid1->Canvas->Brush->Color=clWhite; //Y digamos que los demás de blanco, claro tu puede poner el color que quieras a los géneros que quieras
}
DBGrid1->Canvas->FillRect(Rect); //Una vez elegido el color, lo pinto, Rect es digamos un parámetro que te devuelve este evento, no se declara, ahi está siempre...
DBGrid1->Canvas->TextOut(Rect.left,Rect.top,Table1->FieldValues[Field->DisplayName]); //Para que se vea el texto
Si tienes alguna duda, o no le entiendes a esto, dímelo... y con gusto te ayudaré ^_^ suerte!