delphi - 如何使用 TVirtualStringTree 显示多行项和“扩展”选择项？

Question

我正在寻找类似于下图的外观（我知道这是使用 TVirtualStringTree 完成的），但我还没有找到任何关于如何完成此操作的示例代码。

任何人都知道我如何可以像下面的示例中那样拥有多行项目，并“扩展”选择项目以显示更多行？

Answer 1

请查看 VT Demos\Advanced。在那里你有一个多线节点演示，我猜这可能是你正在寻找的东西。

演示可以在这里找到

编辑： 下载页面在这里，第三项是演示。

Answer 2

我想你已经得到了答案，但我会给你一些将其付诸实践的提示，因为这对我来说有点不稳定。（至少在 Delphi 7 中）

1. 如果您为新行执行#13#10，请确保您在#10 之后有一个空格，否则您将不会得到换行符。

2. VirtualTree.MultiLine[node] := true 将允许多行，但不一定使其成为多行。

3. 更改标题后，执行 VirtualTree.InvalidateNode(Node) 然后 VirtualTree.Refresh 树以获取节点的新大小。