[PROGRAMMATOR]

Ну, во-первых это не ошибка, а замечание. Говорит что функция может не вернуть результат. И правильно, ведь Result отдаст если каталог будет найден. В общем ничего серьезного, нужно просто добавить в начало функции Result := 0;