Perdón por estar tanto tiempo sin contestar...
He probado tu truco, Lepe, y funciona perfectamente, sólo hay un problemilla. Por ejemplo, si tengo esta carpeta:
C:\Archivos de Programa\Archivos Comunes\Microsoft Shared
... y hago:
Código Delphi
[-]
TreeListing('c:\',TreeView1.Items,nil);
Sólo me muestra lo siguiente:
C:\ (<- esto no, es sólo para tener una referencia)
Archivos de Programa
Archivos Comunes
(...)
(...)
Como podría hacer que se mostraran las carpetas dentro de Archivos comunes?