listfiles function with recursive para

maxkleiner / maXbox4

code compiler script studio

GNU General Public License v3.0

23 stars 10 forks source link

listfiles function with recursive para #2

Closed maxkleiner closed 4 years ago

maxkleiner commented 7 years ago

put the function FilesFromWildcard(Exepath, '10.txt',mfilel, true, true, true) in a recursive way to get mfilel:= TStringlist.create; FilesFromWildcard(Exepath, '10.txt',mfilel, true, true, true) writeln(mfilel.text) mfilel.Free;

maxkleiner commented 4 years ago

Parameters: procedure FilesFromWildcard(Dir, Mask: string; var files: TStringList; Subdirs, ShowDirs, Multitasking: Bool)