 Поиск файла, название известно, поддиректория - нет., Маска не срабатывает. |
ВНИМАНИЕ!
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
| TarasBer |
 7.11.2009 17:02
Сообщение
#1
|
 Злостный любитель  Группа: Пользователи Сообщений: 1 755 Пол: Мужской Репутация:  62   |
Res := FindFirst('Models\*\ЛМ-68.md', faAnyFile, F);
Не находит. Если сказать тупо: Res := FindFirst('Models\ЛМ, ЛВС\ЛМ-68.md', faAnyFile, F); То да, он честно находит ЛМ-68.md Но название папки-то заранее не известно, вот в чём суть. -------------------- |
   |
 
|
  |
Ответов
| volvo |
7.11.2009 17:29
Сообщение
#2
|
|
Гость |
Цитата Но мне что тогда делать-то? Я бы, наверное, написал функцию, проверяющую, подходит ли имя файла под заданный шаблон. И ищи файлы рекурсивно во всех папках, начиная с той, что ДО звездочки. Нашел - проверил полное имя. Подходит под шаблон - хорошо, не подходит - ищи дальше... |
|
|
|
Сообщений в этой теме
TarasBer Поиск файла, название известно, поддиректория - нет. 7.11.2009 17:02
volvo FindFirst - вообще очень глючна, причем это не про... 7.11.2009 17:14 TarasBer Да я вообще понимаю, что эта функция - часть ОС.
... 7.11.2009 17:19 TarasBer Но для этого надо написать поиск папок, а этого я ... 7.11.2009 17:39 volvo А не надо искать с faDir, ищи с faAnyFile и потом ... 7.11.2009 18:36 TarasBer Сделал по аналогии, заработало, спасибо. 7.11.2009 18:54 Unconnected У меня, помню, постоянно на строке FindClose(SRec)... 7.11.2009 20:07 volvo Не знаю, только что гонял в консоли, работает, зар... 7.11.2009 20:22 Unconnected В такой процедуре в консоли:
Procedure ScanDir(Di... 7.11.2009 21:22 volvo А в Uses поменять местами SysUtils и Windows (чтоб... 7.11.2009 22:14
Unconnected А в Uses поменять местами SysUtils и Windows (чтоб... 7.11.2009 22:18 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 8.07.2025 10:21 |