TreeView durchlaufen

[bcvs]

Ich benutze den TTreeview schon länger nicht mehr. Aber ging das nicht mit

Delphi-Quellcode:

Node:=TreeView.Items.GetFirstNode;
While Node<>nil do begin
  ...
  Node:=Node.GetNextSibling;
end;