设置DBGRID标题行的颜色

begin
//for i:=0 to (Form_Name.FindChildControl(‘dbgrid1‘) as tdbgrideh).Columns.Count-1 do
begin
(Form_Name.FindChildControl(‘dbgrid1‘) as tdbgrideh).Columns[i].title.color:=$00E6C6AE;
//(Form_Name.FindChildControl(‘dbgrid1‘) as tdbgrideh).Columns[i].title.Alignment:=tacenter;
//(Form_Name.FindChildControl(‘dbgrid1‘) as tdbgrid).Columns[i].Title.:=tacenter;
end;
//(Form_Name.FindChildControl(‘dbgrid1‘) as tdbgrid).DefaultDrawColumnCell(CLRED,DataCol,Column,State);
end;

设置DBGRID标题行的颜色

标签：