Deja esta línea para la última:
Código Delphi
[-](Sender as TDBGrid).DefaultDrawColumnCell(rect,DataCol,Column,State);
Y evidentemente en la opción del color tendrás que decidirte por una u otra, en ambos cambias tanto el 'brush' como el 'font' color.