Treeview liste af filer

Jeg har en liste af filer, som ser sådan ud:

\test.txt
\andre filer\test2.txt
\flere filer\fil1.txt
\flere filer\blandet\rod.txt

osv.

Jeg vil gerne sætte disse op i et TreeView med den rigtige struktur, fx

+ Liste
  + andre filer
    test2.txt
  + flere filer
    + blandet
      rod.txt
    fil1.txt
  test.txt

og i den sortering som det er vist.

jeg er enten meget meget træt, eller for dum til at skrive den passende kode til dette så jeg ligger 60 point til den der kan løse mit problem.

Hvis nogen skulle få lyst til at ref. til TShell-komponenterne i Delphi 6, så vid at det ikke vil give point

Håber at der er en masse god i morgen når jeg vågner :)