VirtualStringTree bringt mich zur Weißglut. Baum anhand von Datei erstellen

[DieDolly]

So richtig verstehe ich dein Beispiel leider nicht.
Ich habe keine Verzeichnisse, nur normale Überschriften.
Wo kommt denn das TDirectoryData her? Jetzt bin ich noch verwirrter als vorher.

Mein Record sieht so aus. Alles andere verstehe ich nicht und verwirrt mich nur noch mehr

Delphi-Quellcode:

type
 TTitleParts = record
  IsHeader: Boolean;
  IsSubItemLevel1, IsSubItemLevel2: Boolean;
  Title: string;
 end;

Und das befülle ich mit einem String der aus einer Datei kommt, geteilt wird (Explode |). Die Datei wird zeilenweise gelesen. Leerzeilen werden ignoriert.

Code:

HEADER|Gruppe1
-|Subitem1
--|Sub-Subitem2

HEADER|Gruppe2
HEADER|-|Gruppe3
--|Subitem1