Alle Verzeichnisse in TTreeView - schnellere Lösung?

[hsg]

Was hat bei TVirtualTreeView nicht funktioniert?

Hast du die Komponente TVirtualExplorerTreeView gefunden und benutzt? (wenn nicht: google mal danach)
der Rest ist dann easy:

Delphi-Quellcode:

  
stvDir.RootFolder  := rfDesktop;
cTmp               := oIni.ReadString('Options','StartDir','');
if cTmp <> '' then begin
  stvDir.BrowseTo(cTmp,True,True,True,false);
end;

und schon steht der TreeView auf das in CTmp angegebene Verzeichnis
Gruss
Jörg