(VST) VirtualStringTree alle Chilt notes durchlaufen

[toms]

ungetestet:

Delphi-Quellcode:

    
    if VST.HasChildren[Node] then 
    begin 
      NextNode := VST.GetFirstChild(Node); 
      for i := 1 to Pred(Node.ChildCount) do 
      begin 
        NextNode := VST.GetNext(NextNode); 
      end; 
    end;