Ну у тебя же есть проверка того, что текущий элемент - не каталог. Соотвественно, в противном случае надо сделать рекурсивный вызов.
Того, тебе надо разбить твою процедуру на 2:
1. Стартовая. Назодит все диски и запускает поиск (2ю процедуру) для корня каждого диска.
2. Собственно, рекурсивная процедура поиска всего и вся от указанного (переданного в параметрах) пути.
|