Поиск файлов

← →
qwer-10 (2005-07-07 16:17) [0]

Для поиска файлов на диске во всего его каталогах и подкаталогах, я использую две отдельные процедуры:

procedure FindFiles (const Path: String); begin FindFirst... ... end;

и
procedure FindFolders (const Path: String); begin FindFirst... ... end;

правильно ли будет написать так:

procedure FindFolders (const Path: String); procedure FindFiles (const: Path: String); begin ... end; begin ... end;

т.е сделать процедуру FindFiles вложенной ? Спасибо!

← →
Digitman © (2005-07-07 16:21) [1]

если в этом есть резон, то ничто этому не мешает

← →
Anatoly Podgoretsky © (2005-07-07 16:25) [2]

А где тут вложенность?

← →
fens (2005-07-07 19:11) [3]

procedure FindFolders (const Path: String);
begin
procedure FindFiles (const: Path: String);
begin
...
end;

...
end;

в этом случае вложенность имеется?

← →
qwer-10 (2005-07-07 19:19) [4]

fens (07.07.05 19:11) [3]
Это я ошибся :)

← →
Anatoly Podgoretsky © (2005-07-07 19:23) [5]

Anatoly Podgoretsky © (07.07.05 16:25) [2]
Увидел (надо все такм отступы делать), все правильно. Не люблю необоснованно вложенные функции. В данном случае не обосновано.

← →
Alexander Panov © (2005-07-07 19:24) [6]

qwer-10 (07.07.05 19:19) [4]

Да не ошибся ты, правильно все написал.
Если у тебя есть в этом необходимость, то совершенно спокойно можешь использовать подобное определение процедур и функций.

← →
Просто Джо © (2005-07-07 19:25) [7]

> [3] fens (07.07.05 19:11)
> в этом случае вложенность имеется?

В этом случае имеется синтаксическая ошибка. И не одна.

← →
ronyn (2005-07-07 22:44) [8]

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

ronyn (07.07.05 22:44) [8]
http://podgoretsky.com/ftp/Language/nps/ru.delphi.html#N158

> [8] ronyn (07.07.05 22:44)
> Как будет выглядеть код...

Смотря как написать. В-общем, выглядеть будет достаточно тривиально.

← →
ronyn (2005-07-10 00:03) [11]

Как сделать , что бы он искал во всех директориях компа?

2 ronyn (10.07.05 00:03) [11]
Повторить вышеописанную последовательность функций для всех логических дисков "компа".

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