![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Поиск файлов FindNext, FindFirst
Novice © (2007-05-03 07:54:00)При использовании функций для поиска файлов столкнулся с такой проблемой. Есть процедура ScanForFiles(Path : string), которая является методом некоторого класса. И вот в чем соль - если переменную MySearchRecord : TSearchRec объявить как локальную переменную процедуры ScanForFiles, тогда вся фукнция работает без проблем - сканирует каталоги любой степени вложенности и все такое. Но стоит переменную MySearchRecord : TSearchRec сделать полем класса в секции Private, как рекурсивный поиск отказывается работать - выглядит это следующим образом - поиск доходит до первого каталога, если в нем есть другие каталоги, то опять входит в первый каталог и так до конца, затем выходит обратно, и вся функция завершается, несмотря на наличие кучи других каталогов.
В чем может быть дело?
Novice (2007-05-03 09:01:00) [1]Ну, что полем класса эту переменную делать ненужно, это я уже понял.
А за объяснение
>>Она должна быть локальной переменной рекурсивной процедуры,
>>иначе поиск не может продолжиться после возврата из рекурсии.
очень благодарен.
MBo (2007-05-03 08:28:00) [2]Ну так не делай MySearchRecord полем класса!
Она должна быть локальной переменной рекурсивной процедуры, иначе поиск не может продолжиться после возврата из рекурсии.