cxGrid常用功能

procedure TFmMonitor.viewMCustomDrawCell(Sender: TcxCustomGridTableView;
ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
var ADone: Boolean);
begin
  if (AViewInfo.GridRecord.Values[TcxGridDBTableView(Sender).GetColumnByFieldName
(‘totalresult‘).Index])<>‘OK‘ then
  begin
    ACanvas.Brush.Color := clRed;
  end;
end;