dbgrid中相同字段的值的行，设置相同的颜色

如有表记录如下
ID  流水号   金额   
1    1      100
2    2      50  
3    2      20
4    2      10
5    3      500
6    4      200
7    4      500
8    5      100 相同"流水号"的行，要求设置相同的颜色
请大侠指点，谢谢

解决方案 »

  1.   

    在drawcolumn下编程
    判断数据集，然后控制颜色
      

  2.   

    初学delphi,实在愚纯，能否提供一下例程，供参考，谢谢
      

  3.   

    Dbgrid的DrawColumnCell事件中加入以下代码就可以了:   
     If   adoquery1.fieldbyname('houseid').AsString='A1001'   then
          Begin
              Dbgrid1.Canvas.Brush.Color   :=   clInfoBk   ;
              Dbgrid1.DefaultDrawColumnCell(   Rect,   DataCol,   Column,[gdFixed,gdFocused,gdSelected]   );
          End   ;
      

  4.   

    阿日写的正确，不过这样A1001就比较死板
    留个邮箱，我给你发个例子
    或者加我QQ：187106433
      

  5.   

    已加QQ
    [email protected]
    谢谢
      

  6.   

    有好例子分享一下,[email protected]
      

  7.   

    补充一下,查询时要加一个order by吧.例子不错,谢谢.