TListFileSearcher

TFileSearcher

OnDirectoryFound

OnFileFound

OnDirectoryEnter

TFileIterator