改变DBGrid列的颜色,没什么特别,但是经过调色师检验欧!
2006-02-04 13:49:02 来源:WEB开发网核心提示:一个过程,直接调用就可以了!PRocedure ChangeDbGridColColor(ojbDbGrid:TDbGrid);var i:integer;begin for i:= 0 to ojbDbGrid.Columns.Count -1 do begin case i mod 3 of 0: ojbDb
一个过程,直接调用就可以了!
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)
更多精彩
赞助商链接