Firemonkey TListView - 调整项目文本边距

时间:2017-11-09 15:25:32

标签: delphi firemonkey listviewitem margins delphi-10-seattle

我正在Firemonkey应用中实现TListView,其中每个列表项的高度必须尽可能小,只要大到足以适合文本。但是,文本顶部有明显的边距,每个列表项的开头都留有空格。

项目外观设置为ListItemRightDetail,但我找不到任何属性允许我控制它 - 无论是在FMX设计还是列表视图的样式中。

如何消除列表项文本顶部的边距,以便最小化列表项高度?

1 个答案:

答案 0 :(得分:1)

没有任何“保证金”属性,因为这个保证金非常内置。但是,可以通过修改PlaceOffset.Y属性并将其设置为负值来调整此值。这将“提升”每个列表项中的内容。我发现-3足以减少这个余量......

ListView1.ItemAppearanceObjects.ItemObjects.Text.PlaceOffset.Y := -3;
ListView1.ItemAppearanceObjects.ItemObjects.Detail.PlaceOffset.Y := -3;