|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
23.11.2012, 22:24 | #1 |
Участник клуба
Регистрация: 12.09.2012
Сообщений: 1,030
|
Программное получение имени файлов в папке
Привет. Есть код:
Код:
Что нужно программисту: Компьютер, Среда программирование, Воображение, Прямые руки, Мозги, Знания этой среды программирования.
Программист-это профессия, а программирование-это моё хобби. Последний раз редактировалось саша40; 23.11.2012 в 22:34. |
23.11.2012, 22:32 | #2 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
Кстати стесняюсь спросить: Эта тема (http://www.programmersforum.ru/showt...=218592&page=2) ничем не помогла?
I'm learning to live...
Последний раз редактировалось Stilet; 23.11.2012 в 22:35. |
|
23.11.2012, 22:35 | #3 |
Участник клуба
Регистрация: 12.09.2012
Сообщений: 1,030
|
ммм. тогда как сделать правильно, что-то не пойму?
Что нужно программисту: Компьютер, Среда программирование, Воображение, Прямые руки, Мозги, Знания этой среды программирования.
Программист-это профессия, а программирование-это моё хобби. |
23.11.2012, 23:12 | #4 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Посмотри внимательно мой пост №15.
Сначала вызывается FindFirst, который создает итератор (переменную принимающую на каждом витке цикла очередное его значение, и косвенно указывающую на следующее значение). В примере итератор - SR. Если итератор создан, т.е. каталог существует то результат функции будет SUCCESS равный нулю. Если происходит ошибка - результатом является код ошибки, который с помошью SysErrorMessage можно превратить в строку и почитать. Далее идет цикл, где твоя программа колдует над очередным полем итератора по имени Name. Это имя файла. После чего until вызывает следующую итерацию при помоши FindNext продолжая поиск, выбирая в итератор следующий файл (его описание), и так пока FindNext не вернет значение не равное нулю - это значит файлов более нет, или каталог поврежден. Таким образом работают генераторы FindFirst...FindNext, возвращая новый элемент поочередно но никак не сразу всем скопом.
I'm learning to live...
|
24.11.2012, 00:03 | #5 |
Старожил
Регистрация: 30.12.2009
Сообщений: 11,430
|
Тс, http://www.delphibasics.ru/
Прочитайте там о FindFirst, FindNext, FindClose и ваши проблемы решатся... |
24.11.2012, 11:13 | #6 |
Пользователь
Регистрация: 06.01.2012
Сообщений: 58
|
Держите:
Код:
|
25.11.2012, 18:54 | #7 | |
Участник клуба
Регистрация: 12.09.2012
Сообщений: 1,030
|
Цитата:
Код:
Что нужно программисту: Компьютер, Среда программирование, Воображение, Прямые руки, Мозги, Знания этой среды программирования.
Программист-это профессия, а программирование-это моё хобби. |
|
25.11.2012, 18:57 | #8 | |
Участник клуба
Регистрация: 12.09.2012
Сообщений: 1,030
|
Цитата:
Код:
Что нужно программисту: Компьютер, Среда программирование, Воображение, Прямые руки, Мозги, Знания этой среды программирования.
Программист-это профессия, а программирование-это моё хобби. |
|
25.11.2012, 19:12 | #9 |
Пользователь
Регистрация: 06.01.2012
Сообщений: 58
|
Если эту строку убрать, приложение может не реагировать на действия пользователя, пока весь список не загрузится.
|
25.11.2012, 19:17 | #10 |
Участник клуба
Регистрация: 12.09.2012
Сообщений: 1,030
|
Тоесть если я её раскоменчу, то пока список не закончится приложение не будет реагировать, верно?
Что нужно программисту: Компьютер, Среда программирование, Воображение, Прямые руки, Мозги, Знания этой среды программирования.
Программист-это профессия, а программирование-это моё хобби. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как найти файл в папке, если в имени папки есть точка? | Zis67 | Общие вопросы Delphi | 9 | 03.10.2012 20:32 |
Проверка наличия файла в папке по имени | strannick | Microsoft Office Excel | 6 | 07.07.2012 18:04 |
Получение имени пользователя | Ellienn | Microsoft Office Excel | 18 | 31.08.2011 08:24 |
Получение имени окна | Artem | Общие вопросы Delphi | 4 | 20.09.2007 16:38 |
Отслеживает появление в папке файлов. слежение за определенным файлом в определенной папке. | RammFan | Win Api | 1 | 09.06.2007 11:09 |