Ich stehe gerade wieder auf dem Schlauch und komme nicht weiter.
Wie durchlaufe ich ein TTreeView? Aber nur das erste Level?

Mein TTreeView hat pro Knoten 2 Unterknoten. Ich möchte den Hauptknoten bekommen und dadurch an die Daten Unterknoten kommen.
Die Daten liegen einfach so im TTreeView mit AddChild.

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

markieren

Delphi-Quellcode:

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