подскажите как узнать список папок

← →
all © (2005-09-19 17:40) [0]

Здравствуйте,

есть путь к папке например "c:/1"

как мне получить список всех папок находящихся в этой папке?

спасибо

← →
Джо © (2005-09-19 17:44) [1]

FindFirst/FindNext/FindClose,DeleteFile. Примеры по всем 3 есть в Справке. Атрибут у папки - faDirectory.

← →
Lamer@fools.ua © (2005-09-19 18:14) [2]

>>Джо © (19.09.05 17:44) [1]

А DeleteFile зачем? :-)

← →
Джо © (2005-09-19 18:22) [3]

> [2] Lamer@fools.ua © (19.09.05 18:14)

А!!! Скопировал из похожей ветки в "Начинающим" :))))

Ничего, авось пригодится Ж:)

← →
Anatoly Podgoretsky © (2005-09-19 18:58) [4]

Lamer@fools.ua © (19.09.05 18:14) [2]
Чтобы дважды это не делать.

← →
ArtemESC © (2005-09-19 19:12) [5]

var
SR : TSearchRec;
begin
If FindFirst(Dir + "*.*", faAnyFile, SR) = 0 then
repeat
If (SR.Name <> ".") and (SR.Name <> "..") and DirectroryExists(Dir + "\" +
SR.Name) then
StringList.Add(SR.Name);
until FindNext(SR) <> 0;
SysUtils.FindClose(SR);
end;

// Dir - должен оканичиваться на слеш (\)

← →
Poirot © (2005-09-19 20:14) [6]

ArtemESC © (19.09.05 19:12) [5]
Ужас, а по атрибутам уже нельзя догадаться, что у нас директория?!

← →
Fay © (2005-09-19 20:19) [7]

2 Poirot © (19.09.05 20:14) [6]
Можно, этим занимается DirectroryExists 8)

← →
ArtemESC © (2005-09-19 20:26) [8]

>>Poirot © (19.09.05 20:14) [6]
>>Ужас, а по атрибутам уже нельзя догодаться, что у нас директория?!
faDirectory глюченная опция, если каталог с расширением, то
он не считаеться каталогом.

← →
Джо © (2005-09-19 20:33) [9]

> [8] ArtemESC © (19.09.05 20:26)
> faDirectory глюченная опция, если каталог с расширением,
> то
> он не считаеться каталогом.

Это новость.

← →
Fay © (2005-09-19 20:34) [10]

ArtemESC © (19.09.05 20:26) [8]
бред

Fay © (19.09.05 20:19) [7]
Не, я всё понимаю, но вот просто вызывать слоноподобную функцию ради проверки аттрибута вместо простой проверки аттрибута- это ли не есть "оптимизация" :))

ArtemESC © (19.09.05 20:40) [11]
Вопрос так ли ты проверяешь этот атрибут?:) Если бы он не работал то как следует из [7] он бы и в DirectoryExists не работал :) Вывод - где то ошибка у тя про его использовании :)

СПАСИБО !

подскажите как узнать список папок Найти похожие ветки