Hallo, herzlich Willkommen!
Mit
FindAllFiles kannst du alle Dateien eines Verzeichnisses ermitteln. Früher gab es in Delphi TShellTreeView und TShellListView. Ob diese noch vorhanden sind, weiß ich nicht, doch diese Komponenten sind genau dafür da und nehmen dir die Arbeit ab.