Verzeichnissliste in Listbox

[shmia]

Zitat von torud:

Ich erhalte alle Unterordner aber auch 2 Einträge mit . und ..

Das sind virtuelle Verzeichnisse, die ausgefiltert werden müssen:

Delphi-Quellcode:

if (SR.Attr and faDirectory = faDirectory) and (sr.Name<>'.') and (sr.Name<>'..') then 
   AList.Add(sr.Name);