Hola, debes utilizar el evento OnDrawColumnCell.
Código Delphi
[-]
procedure TForm1.DBGridDrawColumnCell(
Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if Query.FieldByName('campo').AsString='algo' then
begin
DBGrid.Canvas.Brush.Color := clRed;
DBGrid.Canvas.Font.Color := clWhite;
DBGrid.DefaultDrawColumnCell(rect,DataCol,Column,State);
end;
puedes buscar también el foro hay mucho sobre tu pregunta.
Saluditos