Warum verwendest du nicht einfach die mitgelieferte Funktionalität von Delphi?
Delphi-Quellcode:
uses
System.IOUtils;
var
DirList: TArray<string>;
begin
DirList := TDirectory.GetDirectories('c:\temp', '*', TSearchOption.soAllDirectories);
Das hat auch den Vorteil, dass es nicht nur unter Windows funktioniert.