【原创】Dev Cxgrid--改变列头边框的颜色

自绘表头


procedure cxGridDBTableViewCustomDrawColumnHeader(Sender: TcxGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridColumnHeaderViewInfo; var ADone: Boolean);

var

 ARect: TRect;

begin

 ARect := cxRectInflate(AViewInfo.Bounds, -1,-1);

 ACanvas.FillRect(AViewInfo.Bounds, clRed);

 AViewInfo.LookAndFeelPainter.DrawHeader(ACanvas, ARect, AViewInfo.TextBounds, AViewInfo.Neighbors,

              {AViewInfo.Borders} [], AViewInfo.ButtonState, AViewInfo.AlignmentHorz,  AViewInfo.AlignmentVert, AViewInfo.MultiLine,

              False, AViewInfo.Text, AViewInfo.Params.Font, AViewInfo.Params.TextColor , AViewInfo.Params.Color);

 ADone := True;

end;





联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678