小编ant*_*man的帖子

在delphi中更改listviewitem文本的颜色

我正在尝试更改listviewitem中文本对象的文本颜色.我在listviewitem中有多个文本对象.我正在使用以下代码

Litem := ListView1.Items.Add;
Litem.Data['ytde'] := currtostrf(ytde,ffCurrency,2);
Litem.Data['ytdbe'] := currtostrf(ytdbe,ffCurrency,2);
Litem.Data['ytdetotal'] := currtostrf(ytdetotal,ffCurrency,2);
Litem.Objects.TextObject.TextColor :=  TAlphaColorRec.Green
Run Code Online (Sandbox Code Playgroud)

调试时出现错误说无法访问的对象,但是当我执行以下操作时,我没有问题更改颜色

LItemheader.Purpose := TListItemPurpose.Header;
Litemheader.Objects.TextObject.TextColor := TAlphaColorRec.blue;
Run Code Online (Sandbox Code Playgroud)

有任何想法吗?

delphi firemonkey

5
推荐指数
1
解决办法
1127
查看次数

标签 统计

delphi ×1

firemonkey ×1