delphi - 自动调整大小时如何调整虚拟 TreeView 列的缩进？

Question

我想让 VirtualStringTree 中的列在自动调整列大小时在内容的左侧和右侧具有相同的缩进。

看看我的示例 VST，其中 header 选项 hoDblClickResize 打开了。

在这张图片中，我双击列标题以自动调整“时间”列的大小。我突出显示了列左侧和右侧之间缩进的差异。

如何调整 VST 以使右缩进与左缩进大小相同？我必须破解 VST 源代码吗？如果是这样，有人可以指出我在代码中的正确位置吗？

Answer 1

编写 OnAfterGetMaxColumnWidth 事件处理程序并增加其中的 MaxWidth 参数。我还没有找到这样做的属性。

procedure VirtualStringTreeAfterGetMaxColumnWidth(Sender: TVTHeader; 
  Column: TColumnIndex; var MaxWidth: Integer);
begin
  MaxWidth := MaxWidth + VirtualStringTree.TextMargin;
end;