改变DBGrid列的颜色,没什么特别,但是经过调色师检验欧!
敬业的IT人
互联网
佚名
2008-1-4 16:39:21
一个过程,直接调用就可以了!
procedure ChangeDbGridColColor(ojbDbGrid:TDbGrid);
var
i:integer;
begin
for i:= 0 to ojbDbGrid.Columns.Count -1 do
begin
case i mod 3 of
0: ojbDbGrid.Columns.Items[i].Color:=TColor($0023AF82);
1: ojbDbGrid.Columns.Items[i].Color:=TColor($00339CDB);
2: ojbDbGrid.Columns.Items[i].Color:=TColor($00C69C6D);
end;
end;
end;
(www.sinoprise.com)
- 最新文章
- AXScript.pas,从官方站点找到的IActivsSc..[01-04]
- 从数据库绘制MapX地图(二)[01-04]
- 调用DLL文件中的FORM[01-04]
- 钩子(HOOK)机制的使用[01-04]
- 计算出用字符串表示的数学表达式的值[01-04]
- Delphi的压缩流与解压流[01-04]
- 相关文章
