Protoze nerespektujes FixedCols.
Natvrdo nastavujes CV.Brush.Color := clWhite pro vsechny sloupce. Ale pokud je to pevny sloupec, mel bys nastavit clButtonFace - u tebe se jedna o sloupec 0.
Nebo si aspon uprav tu prvni podminku:
if (ARow > 0) and (ACol > 0) then