TFileSearcher

 

OnDirectoryFound

 

OnFileFound

 

TFileIterator