ShellTreeView : Par défaut et sélection

Bonjour,

J'ai un ShellTreeView.
Lorsque je lance mon appli, j'aimerais que mon filelistbox affiche directement les dossiers qu'il y a dans mon répertoire et que ce dernier soit selectionné.

Exemple :
Si je veux ouvrir par défaut "\Bureau\Programmation\Delphi\", mon ShellTreeView affichera le contenu du dossier "Delphi" et ce dernier sera highlighted.
Or, actuellement, le ShellTreeView m'affiche le contenu de "Programmation" et rien n'est highlighted.

Savez-vous comment puis-je y remédier ?

Merci d'avance

Code:

---

ShellTreeView1.Path := 'Le_chemin_qui_va_bien'

---

et/ou (pas de Delphi sous la main, là) :

Code:

---

ShellTreeView1.Selected := 'Le_chemin_qui_va_bien'

---

Attention au TShellTreeView, il est truffé de fuites mémoire (google est ton ami, ;))

Justement, puisque google est mon ami, j'ai trouvé quelque chose qui correspondait plus à mes attentes en associant VirtualShellTools de Mustang et des composants de JAM Software.

Mais je ne trouve rien qui puisse faire un ReadOnly sur le VirtualExplorerTreeView de Mustang.:cry: