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

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

Поиск [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


Наверх

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