delphi – 具有隐藏节点的Color VirtualStringTree行

概述我目前在我的树的OnBeforeCellPaint事件中使用此代码： if Node.Index mod 2 = 0 thenbegin TargetCanvas.Brush.Color := clBlack; TargetCanvas.FillRect(CellRect);endelsebegin TargetCanvas.Brush.Color := clPurple; 我目前在我的树的OnBeforeCellPaint事件中使用此代码：

if Node.Index mod 2 = 0 thenbegin  TargetCanvas.Brush.color := clBlack;  TargetCanvas.FillRect(CellRect);endelsebegin  TargetCanvas.Brush.color := clPurple;  TargetCanvas.FillRect(CellRect);end;

为我的节点着色.
但是对于隐藏节点,这不起作用,因为索引保持不变.
是否有可见的索引或简单的解决方法？

提前致谢.

解决方法 目前没有这种方法来获取可见性节点索引.但是,您可以在自己的位置迭代可见节点并计算每次迭代.这样的事情(你如何在实际代码中实现它)：

function GetVisibleIndex(Tree: TBaseVirtualTree; Node: PVirtualNode): Integer;var  P: PVirtualNode;begin  Assert(Assigned(Node),'Node must not be nil!');  Assert(Tree.IsVisible[Node],'Node must be visible!');  Result := 0;  P := Tree.GetFirstVisible;  while Assigned(P) and (P <> Node) do  begin    Inc(Result);    P := Tree.GetNextVisible(P);  end;end;

总结

以上是内存溢出为你收集整理的delphi – 具有隐藏节点的Color VirtualStringTree行全部内容，希望文章能够帮你解决delphi – 具有隐藏节点的Color VirtualStringTree行所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。