Hilfe bei einem Treeview

[orion3000]

Hallo Zusammen ich habe ein Problem.

Ich möchte in einem Treeview einen durchlauf durchführen, zur Auswertung des Inhalts, und zwar ab dem ausgewählten Knoten bis zu dem letzen Knoten des ausgewählten Knoten.
Versuche mit While und mit For Schleifen schlugen alle bislang fehl!

Delphi-Quellcode:

Rootkonten

 +Ordner 1                                     „Auswahl  hier“
        +Ordner 2                             „und soll enden hier“

     +Ordner 3                                „Auswahl hier“
           +Ordner 4                          „                     „ 
            +Ordner 5                         „und soll enden hier „

+Ordner 6                  
                    +Ordner 7
                    +Ordner 8
                    +Ordner 9
                           +Ordner 10
                           +Ordner 11        „Auswahl hier“
                                +Ordner 11   „                     „
                                +Ordner 12   „und soll enden hier „
                           +Ordner13 
                        
     +Ordner 14
     +Ordner 15
     +Ordner 16

Es währe nett von euch wenn Ihr mir ein kleines Beispiel posten würdet.

Gruß
Orion