cxGridDBBandedTableView color por condicion

[dfarias]

Necesito colorear una celda en un cxGridDBBandedTableView segun el valor que tiene otra columna. He leido los link posteados pero no encuentro la solucion.

Código Delphi [-]
procedure TfrmTotalCaja.btvTotalesDBBandedColumn1CustomDrawCell(
  Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
  AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin

  if AViewInfo.DisplayValue < qry.fieldbyname('totalReg').asfloat then
          ACanvas.Pen.Color:= clRed
  else
                ACanvas.Pen.Color:= clBlack;

No se si es el envento correcto el que estoy usando.