自定义绘制Cxgrid 网格头

 procedure TFormShangPinList.cxGrid1DBTableView1CustomDrawColumnHeader

 (Sender: TcxGridTableView; ACanvas: TcxCanvas;

 AViewInfo: TcxGridColumnHeaderViewInfo; var ADone: Boolean);

begin

 ACanvas.FillRect(AViewInfo.Bounds, Sender.LookAndFeelPainter.DefaultControlColor);

 ACanvas.FrameRect(AViewInfo.Bounds, Sender.LookAndFeelPainter.DefaultGridLineColor, 1, cxBordersAll);

 ACanvas.DrawTexT(AViewInfo.Text, AViewInfo.TextAreaBounds, cxAlignHCenter or cxAlignVCenter);

 ADone := True;

end;