(VST) VirtualStringTree alle Chilt notes durchlaufen

[Kostas]

Zitat von 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;

Das ist der richt weg.
Hab tausend Dank und einen schönen Abend noch.

Gruß Kostas