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

Список файлов?   Найти похожие ветки 

← →
Insert   (2004-02-24 19:27) [0]

Как в Listbox добавить все файлы папки?

---

← →
Тимохов ©   (2004-02-24 19:29) [1]

Ищем файлы
findfirst
findnext
findclose

Добавляем
tlistbox.items.add

---

← →
Palladin ©   (2004-02-24 19:30) [2]

на средней домашней машине не менее 20 тыс файлов и папок... думаешь прикольно будет в ListBox все это наблюдать? :)

непонятно в чем проблема, в файлах, папках или ListBox"е?

---

← →
Юрий Зотов ©   (2004-02-24 19:32) [3]

var
SR: TSearchRec;
begin
if FindFirst("C:\*.*", 0, SR) = 0 then
try
repeat
ListBox1.Items.Add(SR.Name)
until FindNext(SR) <> 0
finally
FindClose(SR)
end
end

---

← →
Defunct ©   (2004-02-24 19:33) [4]

Palladin © (24.02.04 19:30) [2]
В вопросе написано все файлы папки, а не все файлы и папки ;>
ListBox вполне нормально для такой задачи

---

← →
Юрий Зотов ©   (2004-02-24 19:48) [5]

> Defunct © (24.02.04 19:33) [4]
> ListBox вполне нормально для такой задачи

Если эта папка - не каталог Windows или ему подобный.
:о)

---

← →
Palladin ©   (2004-02-24 19:57) [6]

а ведь верно :) каюсь.. додумал...

---

← →
Anatoly Podgoretsky ©   (2004-02-24 19:58) [7]

Сообщение LB_DIR

---

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

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



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