Ayuda con codigo ondraw

[serebi]

hay que verguenza ya solucione el problema en verdad me da mucha pena haberlos molestado en vano, pero para aclarar lo que realizaba el codigo es :
en un grid en el evento OnSelectCell tomaba el valor Fila := ARow ese es el valor de la fila que seleccione al hacer click en el despues llamaba al repaint del grid con Grid.Repaint ; al hacer esto se ejecutaba el codigo que puse antes y lo que hace es primero le da color a las fixed cells del grid pone estilos al font del grid y por ultimo la fila enla que hice click antes la pinta de otro color y todo se soluciono al aumentar

Grid.Canvas.Font.Color := clMaroon ;

en el ultimo else

muchas gracias por su ayuda y lamento las molestias