Source position: unixutils.pp line 107
procedure GetSubdirectories(
const Dir: AnsiString;
List: TStrings
);