 |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
 
|
|
Поиск файлов у которых в расширении есть слово... 
| CODARZ |
|
|||
 Шустрый  Профиль Группа: Участник Сообщений: 74 Регистрация: 3.10.2003 Где: Москва Репутация: нет Всего: нет |
Как мне посредством Delphi найти файлы у которых
в расширении есть слово "_slovo" (например "superfile.txt_slovo") и все найденные файлы добавить в компонент ListBox?  |
|||
|
||||
Загрузка ...
| stab |
|
|||
 Эксперт Профиль Группа: Экс. модератор Сообщений: 1839 Регистрация: 1.1.2003 Репутация: 14 Всего: 48 |
поищи в FAQ для того он и существует.
-------------------- 6, 6, 6 - the number of the beast. |
|||
|
||||
| Vit |
|
|||
 Vitaly Nevzorov Профиль Группа: Экс. модератор Сообщений: 10964 Регистрация: 25.3.2002 Где: Chicago Репутация: 48 Всего: 207 |
Задача гораздо сложнее чем кажется. Ищи все файлы (FindFirst/FindNext) и далее проверяй расширение.
2 cully Попробуй сделать несколько файлов, например qwerty.xml_done qwerty.xml qwerty.xml_proc Затем прогнать что-то типа FindFirst('*.xml',... Дык вот, они найдутся все! Тяжёлое наследство DOS 8.3 - шаблоны на длинных расширениях - фиг работают, причём зарыто это где-то в API... Сам долго бился и не смог ничего путного сделать... -------------------- With the best wishes, Vit I have done so much with so little for so long that I am now qualified to do anything with nothing Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru |
|||
|
||||
| stab |
|
|||
|
Эксперт Профиль Группа: Экс. модератор Сообщений: 1839 Регистрация: 1.1.2003 Репутация: 14 Всего: 48 |
можно сделать FindFirst('*.*', ..., потом использовать эту функцию:
http://forum.vingrad.ru/index.php?act=ST&f=32&t=5436 короче все есть в FAQ -------------------- 6, 6, 6 - the number of the beast. |
|||
|
||||
| stab |
|
|||
|
Эксперт Профиль Группа: Экс. модератор Сообщений: 1839 Регистрация: 1.1.2003 Репутация: 14 Всего: 48 |
Может еще попробовать FindFirstFileEx, я не пробовал, но возможностей у нее явно больше, чем у FindFirstFile, правда работает только под NT, 2k, XP.
-------------------- 6, 6, 6 - the number of the beast. |
|||
|
||||
|
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.0430 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |