在delphi中更改listviewitem文本的颜色答案

【问题标题】：change color of listviewitem text in delphi在delphi中更改listviewitem文本的颜色
【发布时间】：2016-11-02 10:36:02
【问题描述】：

我正在尝试更改我的 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

调试时的错误提示无法访问对象，但我在执行以下操作时更改颜色没有问题

LItemheader.Purpose := TListItemPurpose.Header;
Litemheader.Objects.TextObject.TextColor := TAlphaColorRec.blue;

有什么想法吗？

【问题讨论】：

标签： delphi firemonkey

【解决方案1】：

找到答案了：

TListItemText(Litem.Objects.FindDrawable('ytde')).TextColor := TAlphaColorRec.Red;

【讨论】：