Pintar un Grid ....me falta algo

[roman]

Prueba poner algo como

Código Delphi [-]
if State*[gdSelected, gdFocused] = [] then
  Canvas.Font.Color := clWhite;

Es decir, con esa condición detectas si la celda en ese momento está seleccionada, y de ser así, pone el color blanco en lugar del rojo.

// Saludos