Скачать: CL | DM;

Поиск   Найти похожие ветки 

← →
Бурато   (2009-03-12 18:35) [0]

Добрый вечер. Я совсем новичок в 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 18:40) [1]

ExtractFilePath + F1

---

← →
Palladin ©   (2009-03-12 18:42) [2]

И совет, как начинающему, накодить это, извинясь, как насрать. Не нужно так говорить. Сумел реализовать - вот так говорят профессионалы и те, кто желает им стать. :)

---

← →
Медвежонок Пятачок ©   (2009-03-12 18:44) [3]

if (sr.Attr and faDirectory) = faDirectory then

---

← →
Бурато   (2009-03-12 18:53) [4]

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

---

← →
Бурато   (2009-03-12 19:17) [5]

столкнулся с ещё одно проблемой. как организовать поиск файлов во всех внутренних каталогах папки?

---

← →
Palladin ©   (2009-03-12 19:19) [6]

решение данной проблеммы заключается в изучении понятия "рекурсия"

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.007 c