Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.02.2011, 09:48   #1
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
Вопрос Как получить имя последней подпапки в папке?

Добрый день! Собственно вопрос: как получить имя последней папки, которая располагается в еще одной папке? Например.
Forlder
|____Folder_1 <- в ней какой-то свой file.txt хранится
|____Folder_2 <- в ней какой-то тоже свой file2.txt файл хранится
....
как получить список названий папок и текстовых файлов в них, чтобы расположить полученное в StringGrid таким образом:
Имя_папки|Файл
Folder_1|file.txt
Folder_2|file2.txt
...
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 04.02.2011, 10:27   #2
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,709
По умолчанию

Пекурсивно пройтись по папкам с маской *.*
p51x вне форума Ответить с цитированием
Старый 04.02.2011, 10:34   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Использовать FindFirst,FindNext,FindClose
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 04.02.2011, 10:51   #4
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
По умолчанию

Это я и так знаю как сделать: найти папки и файлы в папках. Я задал вопрос касаемый именно имени последней папки, в которой лежит текстовый файл.
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 04.02.2011, 11:19   #5
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

Когда рекурсивно ищете, создайте список типа TStringList, кода по ходу дела сбрасывайте результаты поиска, потом из списка вычеркивайте тех, кто не содержит *.txt.
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 04.02.2011, 11:38   #6
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

По крайней мере получить список подпапок, в которых есть txt файлы, а дальше зависит от смысла термина "последний" - последний по времени создания, по алфавиту, по очередности возврата от FindNext
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 04.02.2011, 14:58   #7
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
касаемый именно имени последней папки
Все равно FindNext'ом проходить по всем. Сразу нельзя получить
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как получить имя выделенной фигуры Valegor69 Microsoft Office Excel 3 16.10.2010 14:30
Как получить имя листа? ABCOz Microsoft Office Excel 2 29.11.2009 15:37
Как получить имя файла? Maxx Microsoft Office Excel 4 02.09.2009 13:54
Как получить имя файла Crazyman Работа с сетью в Delphi 4 11.07.2008 00:47
Как получить имя этого компонента? ffo Win Api 2 26.04.2007 23:45