Delphi Firemonkey - 修剪动态列表视图文本对象

Question

我有一个加载一些数据的动态列表视图。其中一项是 TextObject 中的字符串。 我正在尝试将此文本对象的文本修剪设置为字符。我已将对象检查器中的属性设置为 WordWrap：True 和 Trimming：Character。在 Android 中它似乎什么都不做，文本继续未修剪（在 Windows 中它工作正常并且我看到像这样的三个点......）我想也许我需要在代码中进行修剪所以我这样做了：

    procedure TfrmJob.lvWorksheetsUpdateObjects(const Sender: TObject;
      const AItem: TListViewItem);
    Var TextObj: TListItemText;
    begin
       TextObj := AItem.Objects.FindDrawable('Description') as TListItemText;
       TextObj.Trimming := TTextTrimming.Character;
    end;

在 Android 中，这段代码仍然根本不会修剪文本，就像以前一样，它只是继续溢出。

我一定做错了什么。 任何帮助表示赞赏。