|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Результаты опроса: какая функция здесь понадобится? | |||
Знаю | 9 | 64.29% | |
Не знаю | 5 | 35.71% | |
Голосовавшие: 14. Вы ещё не голосовали в этом опросе |
|
Опции темы | Поиск в этой теме |
18.09.2007, 22:46 | #1 |
Регистрация: 18.09.2007
Сообщений: 3
|
Поиск по расширению
Привет всем!!! Я только начинающий программист, можно сказать еще зеленый. Но прошу мне ответить, как можно искать файлы в указанной папки по расширению. Вот прога по которой он ищет в указанной папке:
var searchResult : TSearchRec; fileName : string; fullFilePath : string; dir : string; begin fileName := 'Romeo - Ty Pover.mp3'; dir := 'e:\Music'; fullFilePath := FileSearch(fileName, dir); if fullFilePath = 'e:\Music\'+filename then begin ShowMessage(fullFilePath+' найден'); deletefile ('e:\Music\'+filename); end else ShowMessage(fileName+' не найден'); FindClose(searchResult); end; Как можно найти все файлы с расширением например mp3 или exe? Заранее спасибо за внимание!!! Последний раз редактировалось Memories; 18.09.2007 в 22:53. |
19.09.2007, 01:10 | #2 |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
избитый вопрос, используй поиск по форуму,
плюс я выкладывал исходники плеера, там добавление файлов из папки по заданным расширениям http://www.programmersforum.ru/attac...4&d=1188456458
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог |
19.09.2007, 07:44 | #3 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Memories, можно воспользоваться компонентом FileListBox, натравив его на нужную папку, и он покажет тебе все файлы в ней, а далее в цикле выбирай, если конечно тебе не нужно искать во вложенных папках
I'm learning to live...
|
19.09.2007, 22:00 | #5 |
Регистрация: 18.09.2007
Сообщений: 3
|
хорошо. А как мне найти все файлы одного расширения в опреленной папке?
|
19.09.2007, 22:34 | #6 |
Александр
Администратор
Регистрация: 28.10.2006
Сообщений: 17,530
|
Memories, вам сюда - http://www.programmersclub.ru/lab
|
20.09.2007, 20:03 | #7 |
Регистрация: 18.09.2007
Сообщений: 3
|
Большое спасибо!!!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Поиск | Witaliy | Общие вопросы Delphi | 1 | 01.05.2008 18:42 |
Поиск В бД | Старик_Романыч | БД в Delphi | 5 | 29.04.2008 21:12 |
Имя файла по расширению | wwww | Общие вопросы Delphi | 5 | 19.12.2007 03:41 |
Поиск по FTP | Averss | PHP | 4 | 04.09.2007 20:37 |
поиск | Lonix | Общие вопросы Delphi | 2 | 04.04.2007 01:59 |