if '1' = AViewInfo.GridRecord.Values[cxgrdbclmnGridDBTableView5ysbj.Index] then
begin
   //整行背景颜色设置 
   //ACanvas.Canvas.Brush.Color := clGreen;
   //整行字体颜色设置
   //ACanvas.Font.Color := clGreen;
end;

 1 procedure TFrm_Qry_DBLT.cxGrid1DBTableView1StylesGetContentStyle(
 2   Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord;
 3   AItem: TcxCustomGridTableItem; out AStyle: TcxStyle);
 4 begin
 5     if ARecord is TcxGridDataRow  then
 6     //and not ARecord.Selected then //选中行导出没有颜色
 7     begin
 8         if ARecord.Values[cxGrid1DBTableView1.GetColumnByFieldName('CQ').Index] > 1 then
 9             AStyle := cxStyle1 //属于 TcxStyleRepository
10     end;
11 end;

 1 procedure TMainFrm.cxGridHisDBTableView1CustomDrawCell(
 2   Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
 3   AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
 4 begin
 5   //第7列颜色改变
 6   if (AViewInfo.Item.ID = 6) then
 7   begin
 8     ACanvas.Brush.Color := clred;
 9   end;
10 
11 end;