Delphi数据网格色彩特效(斑马线).docVIP

实战Delphi数据网格色彩特效 　　Delphi中的数据网格控件(TDbGrid)对于显示和编辑数据库中大量的数据起着十分重要的作用；然而，在使用数据网格控件的同时，也往往因为表格中大量的数据不易区分，而令操作者眼花缭乱。如何提高网格控件的易用性，克服它的此项不足呢？本文从改变数据网格的色彩配置角度，提出了一种解决办法。 　　以下为数据网格控件的6种特殊效果的实现方法，至于数据网格控件与数据集如何连接的方法从略。 1. 纵向斑马线效果：实现网格的奇数列和偶数列分别以不同的颜色显示,以区别相邻的数据列。 　　file://在DbGrid的DrawColumnCell事件中编写如下代码： 　　Case DataCol Mod 2 = 0 of 　　　True: DbGrid1.Canvas.Brush.Color:= clBlue; file://偶数列用蓝色 　　　False: DbGrid1.Canvas.Brush.Color:= clAqua; file://奇数列用浅绿色 　　End; 　　DbGrid1.Canvas.Pen.Mode:=pmMask; 　　DbGrid1.DefaultDrawColumnCell (Rect, DataCol, Column, State); 2.