• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 186
  • Last Modified:

walk down a folder structure recursively

Is there somewhere a component or an object pascal exemple, which helps
me to walk down a folder structure recursively? I would like to notice
each filename and foldername (inc. date) found in this structure for later usage.

Any hint is welcome !
0
rjufer
Asked:
rjufer
1 Solution
 
d003303Commented:
Yo,
create a recursive function in your main function that adds e.g. the complete path with filename to a list.
A quick flow-example without syntax warranty:

procedure RecurseDirs(Dir : string; List : TStringList);
 procedure Recurse(ADir : string);
 begin
   ( FindFirst/FindNext loop stuff )
   ( check if file is a directory )
   ( if yes, call Recurse(ADir + '\DirName') )
   ( if no, add file to list )
   ( end of loop )
 end;
begin
  Recurse(Dir);
end;

Slash/d003303
0
 
rjuferAuthor Commented:
Thanks very mutch.

Rolf
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Cloud Class® Course: SQL Server Core 2016

This course will introduce you to SQL Server Core 2016, as well as teach you about SSMS, data tools, installation, server configuration, using Management Studio, and writing and executing queries.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now