Как пропустить поиск в определенных каталогах ?

← →
tmpGuest (2005-03-02 10:43) [0]

Уважаемые мастера! В программе есть функция поиска файлов на диске во
всех его каталогах. Допустим, мне нужно, чтобы в каталоге c:\MyDir и
во всех его подкаталогах поиск не производился. Для этого я использую
такой вот метод:

var
SearchRec: TSearchRec;

begin
...

if Pos("c:\mydir",AnsiLowerCase(SearchRec.Name)) = 0 then

...
end;

Есть ли более красивое решение ?
Заранее благодарен!

← →
Reindeer Moss Eater © (2005-03-02 10:46) [1]

В SR.Name вряд ли вообще окажется строка "C:\mydir"

← →
ЮЮ © (2005-03-02 10:58) [2]

Если поиск ведется рекурсивно, то не входить в паку с именем MyDir

← →
tmpGuest (2005-03-02 11:11) [3]

ЮЮ © (02.03.05 10:58) [2]

Ступил я чего-то. Спасибо! :)

Остается реализовать это самое "не входить"
Код приведенный выше "не войдет" не только в папку c:\mydir, но и во все остальные. Либо войдет во все. В зависимости от того, что там между бегином и ендом.

Заменим "не входить" на выходить.

Как пропустить поиск в определенных каталогах ? Найти похожие ветки