[lmikle]

Проще переписать с нуля.
Там поиск-то достаточно простой.
Поиск в глубину - сначала отрабатываем папки, потом файлы.
Поиск в ширину - сначала файлы, потом папки.

Сам поиск идет стандартным методом FindFirst/FindNext/FindClose.