|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
10.02.2021, 22:57 | #1 |
Форумчанин
Регистрация: 10.02.2021
Сообщений: 653
|
Список папок в папке
Итак... Как получить список папок в папке? И вывести их в Мемо
Уже долго ищу, не могу найти нигде Нужны только папки. Без файлов в них |
11.02.2021, 00:28 | #2 |
Пользователь
Регистрация: 05.05.2018
Сообщений: 92
|
Код:
TSearchRec = record Time : Integer; Size : Integer; Attr : Integer; Name : TFileName; ExcludeAttr : Integer; FindHandle : THandle; FindData : TWin32FindData; end; |
11.02.2021, 01:23 | #3 |
Форумчанин
Регистрация: 10.02.2021
Сообщений: 653
|
Сугубо методом тыка из шаблона для поиска файлов сделал вот такой код
Кто поопытнее, можете проверить, правильно все тут? Какие могут быть "подводные камни" у такой конструкции? Код:
Последний раз редактировалось Kronos913; 11.02.2021 в 13:31. |
11.02.2021, 12:08 | #4 |
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 15,646
|
Тут он список всех файлов выдаст, а не только папок. При этом пройдет рекурсивно по всем подпапкам. По задачи не ясно, надо ли углубляться дальше в дерево каталогов?
E-Mail: arigato.freelance@gmail.com
|
11.02.2021, 12:11 | #5 |
Участник клуба
Регистрация: 03.06.2009
Сообщений: 1,834
|
а не заменить ли для поиска папок параметр faAnyFile на другой? например, faDirectory?
--------------- faAnyFile: Любой файл faReadOnly: Файлы nолько для чтения faHidden: Скрытые файлы faSysFile: Системные файлы faVolumeID: файлы идентификатора объема faDirectory: Файлы каталоги faArchive: Архивные файлы
Программирование - это единственный способ заставить компьютер делать то, что тебе хочется, а не то, что приходится.
|
11.02.2021, 13:13 | #6 | |
Форумчанин
Регистрация: 10.02.2021
Сообщений: 653
|
Цитата:
Оно еще почему-то в каком-то рандомном порядке выводит список, что нужен дополнительный алгоритм сортировки по алфавиту Касательно задачи - только список ближайших папок. Без вложенных в них Последний раз редактировалось Kronos913; 11.02.2021 в 13:39. |
|
11.02.2021, 22:02 | #7 |
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 15,646
|
А никто сортировку и не обещал.
E-Mail: arigato.freelance@gmail.com
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Список файлов и папок в каталоге | Evgenuych96 | Паскаль, Turbo Pascal, PascalABC.NET | 7 | 27.10.2012 14:07 |
Получить список расшаренных папок | Scooter72 | Работа с сетью в Delphi | 7 | 16.06.2010 19:46 |
Получить список файлов и папок. | gusluk | Общие вопросы Delphi | 3 | 10.03.2009 12:49 |
Получить список папок | Иллидан | Общие вопросы Delphi | 1 | 22.03.2008 15:24 |
Microsoft Office Outlook : удаление папок в папке контакты | bufer | Софт | 0 | 05.12.2007 16:58 |