| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как пропустить поиск в определенных каталогах ? [D6, D7, WinXP]
tmpGuest © (2005-03-02 10:43:00)Уважаемые мастера! В программе есть функция поиска файлов на диске во
всех его каталогах. Допустим, мне нужно, чтобы в каталоге c:\MyDir и
во всех его подкаталогах поиск не производился. Для этого я использую
такой вот метод:
var
SearchRec: TSearchRec;
begin
...
if Pos('c:\mydir',AnsiLowerCase(SearchRec.Name)) = 0 then
...
end;
Есть ли более красивое решение ?
Заранее благодарен!
Anatoly Podgoretsky (2005-03-02 15:03:00) [1]Заменим "не входить" на выходить.
Reindeer Moss Eater (2005-03-02 11:13:00) [2]Остается реализовать это самое "не входить"
Код приведенный выше "не войдет" не только в папку c:\mydir, но и во все остальные. Либо войдет во все. В зависимости от того, что там между бегином и ендом.
tmpGuest (2005-03-02 11:11:00) [3]ЮЮ © (02.03.05 10:58) [2]
Ступил я чего-то. Спасибо! :)
ЮЮ (2005-03-02 10:58:00) [4]Если поиск ведется рекурсивно, то не входить в паку с именем MyDir
Reindeer Moss Eater (2005-03-02 10:46:00) [5]В SR.Name вряд ли вообщеокажется строка "C:\mydir"
| |
