码迷,mamicode.com
首页 > 其他好文 > 详细

cxgrid行,列颜色控制

时间:2015-03-31 18:06:11      阅读:265      评论:0      收藏:0      [点我收藏+]

标签:

在cxGridDBTableView的OnCustomDrawCell事件中


begin

  AText:=IntToStr(ARecord.Index);
end;


procedure TMain_Form.cxgrdbtblvwGrid1DBTableView1CustomDrawCell(
  Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
  AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
   var
   ARec: TRect;
begin


 //*******************************  特定的某一行变颜色*****************************


//  if (AViewInfo.GridRecord.Values[TcxGridDBTableView(Sender).GetColumnByFieldName

(‘SheBeiBianHao‘).Index])=‘20050419‘ then

//
//  begin
//   ACanvas.Brush.Color := clRed;
//  end;


  //*************************************隔行变颜色************************
//   if AViewInfo.RecordViewInfo.Index mod 2 = 0 then
//   begin
//    ACanvas.Canvas.brush.color := clInfoBk ;
//   end
//   else
//   begin
//     ACanvas.Canvas.brush.color :=clGreen;
//   end;
   //********************  隔列变颜色**************************
//if AViewInfo.Item.Index mod 2 = 0 then
//ACanvas.Canvas.brush.color := clGreen
//else
//ACanvas.Canvas.brush.color := clGrayText;
 //*********************  设置行的颜色 **************************
//begin
//   ARec := AViewInfo.Bounds;
//   ACanvas.canvas.brush.color:= clGreen;
//   ACanvas.FillRect(ARec)
//end;
  //*********************  设置单元格的颜色 **************************
//   begin
//   ARec := AViewInfo.ClientBounds;
//   ACanvas.canvas.brush.color:= clGradientActiveCaption;
//    ACanvas.canvas.Font.Color:=clGreen;   //字体颜色设置
//   ACanvas.FillRect(ARec)
//   end;
  //***********************************************
end;

cxgrid行,列颜色控制

标签:

原文地址:http://blog.csdn.net/hello_myhome/article/details/44782233

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!