Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.25;
Скачать: CL | DM;

Вниз

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

 
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? Заранее благодарен.


 
Anatoly Podgoretsky ©   (2005-07-07 22:55) [9]

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


 
Просто Джо ©   (2005-07-07 22:56) [10]


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

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


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

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


 
Германн ©   (2005-07-10 01:04) [12]

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



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

Текущий архив: 2005.07.25;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.088 c
3-1117703908
KirillR
2005-06-02 13:18
2005.07.25
DOA при подсчете кол-ва записей в TOracleDataSet происходит запро


1-1120632771
Kaban
2005-07-06 10:52
2005.07.25
Scan-коды


9-1113467814
parovoZZ
2005-04-14 12:36
2005.07.25
Техника QuadTree


1-1120733493
kyn66
2005-07-07 14:51
2005.07.25
Перевести исходник СИ++ на Паскаль


1-1120502611
Galiaf
2005-07-04 22:43
2005.07.25
tstringlist не находит файл!