Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Определить путь к файлу (TSearchRec) [D7]


Иван ©   (2016-11-04 23:25:00) 

Здравствуйте!
Используя FindFirst и FindNext ищу необходимые мне файлы и заношу результат в массив типа TSearchRec. Как я могу узнать путь к файлу, который в данный момент проверяется на соответствие к заданным в FindFirst критериям?
То есть я имею цикл while, в котором найденный файл заносится в массив. Как узнать путь данного файла?
while (FindNext(gotFile)) = 0 do
 begin
   inc(countOfFiles);
   inc(iterator);
   arrOfFiles[iterator] := gotFile;
   findSameFiles(arrOfFiles[iterator], arrOfFiles);
 end;


sniknik   (2016-11-07 08:10:00) [1]

Удалено модератором
Примечание: Нарушение правил конференции


Inovet   (2016-11-06 03:22:00) [2]

Удалено модератором
Примечание: Создание пустых сообщений


Германн   (2016-11-06 03:11:00) [3]

Удалено модератором
Примечание: Создание пустых сообщений


Иван   (2016-11-06 01:27:00) [4]

Решил проблему путём использования метода "ExpandFileName(fileName: string)"


sniknik   (2016-11-05 23:25:00) [5]

> "iop" правильно понял суть задачи.
если хочется полный путь оттуда где его нет, то задача неразрешима, если же просто нужен полный путь, то следует поменять условие. ваш кэп.


Внук   (2016-11-05 17:38:00) [6]

А разве в параметре FindFirst не задается каталог поиска? Что еще надо?


Иван   (2016-11-05 12:49:00) [7]

"iop" правильно понял суть задачи.


iop   (2016-11-05 12:35:00) [8]

вы нифига не поняли

у него после поиска остается массив tsearchrec
в котором имена без путей.
а ему хочется абсолютный путь до файлов.
ну или относительный


Dimka Maslov   (2016-11-05 11:37:00) [9]


> Как вариант


Вроде как единственный. Получил все файлы, а потом хоть регэкспы к именам применяй. Вся хитрость заключается в отделении папок от файлов.


kilkennycat   (2016-11-05 01:22:00) [10]


> который в данный момент проверяется на соответствие к заданным в FindFirst критериям

ну, если формулировка правильная, то никак. FindNext не заполняет TSearchRec в случае несоответствию шаблону. Как вариант, решение может быть  следующим: задать шаблон *.* чтобы получать результат по всем файлам, а обработку на соответствие нужному шаблону делать вручную.


Наверх

Титульная страница Поиск, карта сайта Написать письмо