cxGrid 上下行数据进行比较 大家好。 如何在cxGrid 控件上实现以下的功能。 有两行数据。某一列上下行的值不同的时候,将这一列用红色字体表示。。谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.cxGrid1DBTableView1CustomDrawCell( Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);{参数 Sender: 你要实现特效的TableView; ACanvas: 画布, 这个参数比较重要, 就是用这个参数画出特效; AViewInfo: 自定义条件的来源; 从这个参数中获取单元格值; ADone: 设为真就不会Paint. }begin //遍历列并判断上下值是否相同 {AViewInfo.GridRecord.Values[3]:取得某一列(3是代表第四列} ACanvas.Brush.Color := clred;//背景色改变 ACanvas.Font.Color:=clred;//字体颜色改变end; 这样创建的热键如何去除? 打印机切纸 发个散分贴 在线等,回答给分!!! 如何判断网卡或路由5分钟内是否有数据传输? 请问,谁知道delphi如何实现动态翻页效果?谢谢! 如何使DateTimePicker显示系统时间啊!! 各位XDJM有没有表达式控件? 这句话是什么意思?(在线等候...高手请进) 征求意见:供应商资料档的数据结构! 能否让rzstringgrid某个单元格不能点击(失去焦点) 如何提示 《软件已经有新版本,然后自动链接到新版本的路径》
procedure TForm1.cxGrid1DBTableView1CustomDrawCell(
Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
{参数 Sender: 你要实现特效的TableView;
ACanvas: 画布, 这个参数比较重要, 就是用这个参数画出特效;
AViewInfo: 自定义条件的来源; 从这个参数中获取单元格值;
ADone: 设为真就不会Paint. }
begin
//遍历列并判断上下值是否相同 {AViewInfo.GridRecord.Values[3]:取得某一列(3是代表第四列}
ACanvas.Brush.Color := clred;//背景色改变
ACanvas.Font.Color:=clred;//字体颜色改变
end;