![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Поиск [D7]
Бурато © (2009-03-12 18:35:00)Добрый вечер. Я совсем новичок в Delphi, и у меня возник вопрос. Как реализовать следующие: Мне нужно что бы
1) в листбокс добавлялись имена всех папок которые хранятся в каталоге C:\Temp\..
2)Подскажите как узнать путь файла который открыли через opendialog.
буду вам очень признателен, если вы поможете.
P.S. Я сумел накодить добавление определенного формата, но с папками не могу разобраться
if FindFirst('C:\Temp\*.mp3', faAnyFile, sr) = 0 then
begin
repeat
if (sr.Attr and faDirectory)=0 then
begin
listbox1.Items.add('C:\Users\1\Music\'+sr.name);
end;
until FindNext(sr) <> 0;
FindClose(sr);
end;
Palladin (2009-03-12 19:19:00) [1]решение данной проблеммы заключается в изучении понятия "рекурсия"
Бурато (2009-03-12 19:17:00) [2]столкнулся с ещё одно проблемой. как организовать поиск файлов во всех внутренних каталогах папки?
Бурато (2009-03-12 18:53:00) [3]спасибо, с папками разобрался. Сейчас буду реализовывать алгоритм нахождения пути файла
Медвежонок Пятачок (2009-03-12 18:44:00) [4]if (sr.Attr and faDirectory) = faDirectory then
Palladin (2009-03-12 18:42:00) [5]И совет, как начинающему, накодить это, извинясь, как насрать. Не нужно так говорить. Сумел реализовать- вот так говорят профессионалы и те, кто желает им стать. :)
Palladin (2009-03-12 18:40:00) [6]ExtractFilePath + F1