DELPHI XE10 fmx表格控件Grid单元格根据内容值来设置颜色

DELPHI 10.3.3环境下，因为个人需要对表格根据单元格的复制内容判断来设置指定文字颜色，在网上搜索了大多数是TStringGrid、DBGrid、cxGrid之类的，而且新版DELPHI10以上的比较少，根据实际调试使用，在DELPHI10.3.3通过以下测试代码：

具体通过处理GRID的Grid1DrawColumnCell()事件来增加代码实现。

//FMX 中设置GRID某列中的内容显示背景颜
procedure Tfmtel.Grid1DrawColumnCell(Sender: TObject; const Canvas: TCanvas;
const Column: TColumn; const Bounds: TRectF; const Row: Integer;
const Value: TValue; const State: TGridDrawStates);
begin
bgBrush:=TBrush.Create(TBrushKind.Solid,TAlphaColors.White);//定义缺省颜色
try
if Column.Index=3 then
begin
if trim(Value.ToString)='卖出' then
begin
bgBrush.Color := TAlphaColors.Palegreen;
Canvas.FillRect(Bounds,0,0,[],1,bgBrush);
end
else
begin
bgBrush.Color := TAlphaColors.Pink;
Canvas.FillRect(Bounds,0,0,[],1,bgBrush);
end;
end;
finally
bgBrush.free;
end;
end;

//FMX 中设置GRID某列中的内容显示为指定颜色的字
procedure Tfmtel.Grid1DrawColumnCell(Sender: TObject; const Canvas: TCanvas;
const Column: TColumn; const Bounds: TRectF; const Row: Integer;
const Value: TValue; const State: TGridDrawStates);
var
bgBrush:TBrush;
begin
if Column.Index=3 then
begin
if trim(Value.AsString)='卖出' then
begin
Canvas.Fill.Color := TAlphaColors.Green;
Canvas.FillText(Bounds,Value.AsString,false,1,[],TTextAlign.Leading,TTextAlign.Center);
end
else
begin
Canvas.Fill.Color := TAlphaColors.Red;
Canvas.FillText(Bounds,Value.AsString,false,1,[],TTextAlign.Leading,TTextAlign.Center);
end;
end;
end;

DELPHI XE10 fmx表格控件Grid单元格根据内容值来设置颜色相关推荐

Winform实现在DataGridView控件的单元格中添加多个控件
Winform实现在DataGridView控件的单元格中添加多个控件背景实现思路关键代码完整代码下载背景 DataGridView控件的列是支持TextBoxColumn.ComboBox ...
python读取excel表格-Python读取Excel单元格的内容
python读取excel的单元格返回类型 Python通过xlrd对Excel进行读取操作时,返回的数据类型(ctype)有下面5中类型: 0 – empty:空 1 – string:字符串 2 ...
MFC List Control 控件添加单元格编辑，实现可编辑重写
在实现随机生成四则运算的个人项目中,目前已经完成基本功能,想要把程序变成一个Windows界面的程序.原本以为学习过MFC,应该很快就能完成.但是由于以前用的都是VC6.0,这次用了VS2010,稍微 ...
为tableview添加带控件的单元格如复选框checkbox与combbox单元格
我们常常会有这样的需求,为QTableView增加复选框checkbox和选择下拉框combbox,毕竟依靠键盘输入不是很好约束其规范性.下面我们逐个来介绍.完成之后的效果如下: 一.准备TableV ...
帆软js--获取控件和单元格
参数面板: 获取面板控件 ,name为控件名称:_g().parameterEl.getWidgetByName("name") 取值:_g().parameterEl.getW ...
Asp.net的GridView控件实现单元格可编辑
最近做一个功能,考虑到用户使用方便,减少弹出页面,采用点"编辑"按钮无需弹出页面直接当前行的单元格内容就能编辑.进入页面显示如下图: 点"编辑"按钮后显示如下图 ...
用Xlsx xlsx-style 导出excel表格，附带合并单元格，文字居中，文字颜色字体大小等样式 (复制即可实现)
提示:写完文章后,目录可以自动生成,如何生成可参考右边的帮助文档文章目录系列文章目录前言一.用Xlsx xlsx-style 导出excel表格二.使用步骤 1.安装插件 2.引入总结前 ...
Xceed WinForm数据表格控件Xceed Grid For .NET详细介绍
2019独角兽企业重金招聘Python工程师标准>>> Xceed Grid For .NET是一款高级的,多功能的.扩展性极强的数据表格控件,具有分组.主从表.多种主题外观.固定列 ...
extjs 表单设置html5,ExtJS 配置和表格控件使用
ExtJS是一套完整的RIA解决方案,也因为功能完整造成了ext-all.js有400多k,由于是基于JS和CSS的功能实现,对客户端机器性能也有一定的要求,即不支持IE6以下的版本.如果您的项目对网 ...
[转]ExtJS的使用方法汇总—配置和表格控件使用
在网上差一些关于ExtJS的相关资料,看到这篇博客写的不错,拿出来分享一下! 博客文章:ExtJS的使用方法汇总(1)--配置和表格控件使用 ExtJS的使用方法汇总(2) ...

DELPHI XE10 fmx表格控件Grid单元格根据内容值来设置颜色

DELPHI XE10 fmx表格控件Grid单元格根据内容值来设置颜色相关推荐

最新文章

热门文章