请教关于dbgrideh 不同值颜色不同的问题

Question

如
11111  aaa   不不不   ddd
11111  bbbb  各顾各   tttt
22222  bbbbb  大幅度  辅导费
22222  得到的地方  方的飞根据第一列相同值颜色相同  不同值颜色不同  第一列的值是不确定的 

Answer 1

ADO一读数据,就把第一列的值传给变量,然后在DRAW里根据这些变量判断输出不同的颜色

Answer 2

procedure Tfrm1.dbGD1DrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  State: TGridDrawState);
begin
if qry1.FieldByName('field1').AsString ='11111' then begin
  dbgd1.Canvas.Font.Color:=clred;
  dbgd1.DefaultDrawColumnCell(rect,datacol,column,State);
end;
if qry1.FieldByName('field1').AsString ='22222' then begin
  dbgd1.Canvas.Font.Color:=clgreen;
  dbgd1.DefaultDrawColumnCell(rect,datacol,column,State);
end;
end;