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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 25.10.2008, 20:52   #1
mutabor
Телепат с дипломом
Старожил
 
Аватар для mutabor
 
Регистрация: 10.06.2007
Сообщений: 4,929
По умолчанию Потестируйте программу (поиск похожих MP3 файлов)

Программа ищет не дубликаты, а похожие файлы, к-рые могут оказаться той же песней, но с другим качеством, другим размером файла. Ей можно делать второй проход после программы удаления дубликатов. Может найти и дубликаты, если в них есть теги или одинаковые имена файлов.
Программу и алгоритм поиска еще буду дорабатывать, это первая рабочая версия.
Настройки по умолчанию 3 - 3, можно попробовать 5 (общий) - 2 (Левенштейн). Общую настройку лучше ставить в диапазпоне 3 - 6, Левенштейна выше пяти лучше не поднимать, все подряд загребет.
Вложения
Тип файла: zip compare_mp3_test.zip (253.1 Кб, 72 просмотров)
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)
Проверь себя! Онлайн тестирование | Мой блог
mutabor вне форума Ответить с цитированием
Старый 25.10.2008, 22:14   #2
Манжосов Денис :)
Участник клуба
 
Регистрация: 29.01.2008
Сообщений: 1,039
По умолчанию

Громоздкий интерфейс.
Project 1 не очень для названия.
Одну песню нашёл с похожими названиями, но они разные по звучанию.
Все остальные песни работабт нормально(типа сортируются).
Ну и спс, я старую мелодию нашёл благодаря программе.
Манжосов Денис :) вне форума Ответить с цитированием
Старый 25.10.2008, 22:51   #3
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Хорошая программа!
Хороший интерфейс.
Только было бы неплохо если форма с настройками появлялась по средине экрана (то есть установить ей свойство Form1.Position:=PoScreenCenter.
И я заметил если идёт поиск и нажать на кнопку отмена, то выскакивает ошибка.
Всегда рад помочь!

Последний раз редактировалось Terran; 25.10.2008 в 22:54.
Terran вне форума Ответить с цитированием
Старый 25.10.2008, 23:28   #4
Air
Участник клуба
 
Аватар для Air
 
Регистрация: 30.04.2007
Сообщений: 1,307
По умолчанию

У меня размер файлов не определил и длину.
Есть пустые строки (см. архив)

при настройке:
общей чувствительности = 10
чувствительности алгоритма = 10
- выдал равенство 2-х файлов отличных как по названию, так и по звучанию, одно верно, там поют в два голоса, и в той и в другой песне присутствует один и тот же артист.

при настройке:
чувствительности = 0
чувствительности алгоритма = 0
- можно сказать что все файлы одинаковы, - сгруппировал по исполнителям.

при настройке:
общей чувствительности = 10
чувствительности алгоритма = 0
- результат - пусто.

при настройке:
общей чувствительности = 0
чувствительности алгоритма = 10
- даже не знаю как сказать...
всего 2-е группы, что в первой что во второй присутствуют одинаковые исполнители, но разные песни.
получилось как бы половина тут половина там

при настройке:
общей чувствительности = 5
чувствительности алгоритма = 5
- пожалуй самый оптимальный, нашёл совпадения исполнителей.
________

В разработке интерфейса могу посоветовать ввести ТPageControl, и назвать "Шаг 1", "Шаг 2", "Шаг 3", хотя можно организовать ТMainMenu и настройки запихать во вкладку "сервис".
Используй метод application.Title:=Form1.Caption;
настройки можно вывести на отдельную форму и сделать пред.настройки - заготовки и назвать "Точный поиск", "Поиск по названию" (что-то в этом роде)
______
прога интересная, удачи в доработке.
__________
в 003.zip ещё один косяк, почему-то когда указываю C:\ поиск не производит.
Вложения
Тип файла: zip 002.zip (34.5 Кб, 16 просмотров)
Тип файла: zip 003.zip (863.8 Кб, 15 просмотров)
Всё гениальное - просто!

Последний раз редактировалось Air; 25.10.2008 в 23:43.
Air вне форума Ответить с цитированием
Старый 26.10.2008, 09:40   #5
anton14
Форумчанин
 
Аватар для anton14
 
Регистрация: 19.04.2008
Сообщений: 150
По умолчанию

Программа хорошая! В плане интерфейса, тоже ничего, но нужно доработать! У меня всё работает, сразу нашёл похожие mp3, только ждать пришлось долго.
anton14 вне форума Ответить с цитированием
Старый 26.10.2008, 10:38   #6
mutabor
Телепат с дипломом
Старожил
 
Аватар для mutabor
 
Регистрация: 10.06.2007
Сообщений: 4,929
По умолчанию

Спасибо за найденные баги, и за советы.

Цитата:
Громоздкий интерфейс.
А что именно? Поясни.

Интерфейс поменяю. Мне не нравится что при таком интерфейсе мало места для результатов. Или вынесу настройки в меню, или результаты в отдельном окне будут. Наверное все таки меню сделаю, с ним привычнее.

Поиск буду дорабатывать. Особенно общий алгоритм хромает. А то действительно сортировку больше напоминает. Алгоритм сравнения (Левенштейна) работает хорошо, но нужно будет настройки более интуитивно понятные сделать и диапазон сузить до приемлемых значений.

Цитата:
только ждать пришлось долго
Есть такое. Сначала доработаю поиск в плане качества, а потом через оптимизатор пропущу. Это еще не долго, долго я жду когда работу алгоритма в файл сохраняю для проверки )
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)
Проверь себя! Онлайн тестирование | Мой блог
mutabor вне форума Ответить с цитированием
Старый 26.10.2008, 10:41   #7
Манжосов Денис :)
Участник клуба
 
Регистрация: 29.01.2008
Сообщений: 1,039
По умолчанию

Цитата:
А что именно? Поясни.
Как вы уже сказали, лучше сделать вывод результата в отдельном окне. В главном окне оставить выбор папки, настройки и сам прогресс. По окончании показать результат в отдельном окне.
Манжосов Денис :) вне форума Ответить с цитированием
Старый 26.10.2008, 13:48   #8
Kostia
Участник клуба
 
Аватар для Kostia
 
Регистрация: 21.11.2007
Сообщений: 1,690
По умолчанию

У меня есть файлы с синтаксической ошибкой в имени и программа выдала ошибку и зависла. Думаю стоит добавить блок try except или проверку на возможность открытия файла.
П.С. Winamp новой версии его открывает.
Интерфейс мне понравился! Удобный и простой. Хотя есть предложения сделать по шагам как при установки программы.
Kostia вне форума Ответить с цитированием
Старый 27.10.2008, 17:22   #9
mutabor
Телепат с дипломом
Старожил
 
Аватар для mutabor
 
Регистрация: 10.06.2007
Сообщений: 4,929
По умолчанию

Цитата:
У меня есть файлы с синтаксической ошибкой в имени
А что за ошибка? Как винда их терпит?
Цитата:
Думаю стоит добавить блок try except
Есть такой блок, хотелось бы знать конкретнее из-за чего ошибка. Во время поиска или при попытке воспроизвести? Если не трудно залей файл на обменник или если уверен что в имени дело напиши что за имя.
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)
Проверь себя! Онлайн тестирование | Мой блог
mutabor вне форума Ответить с цитированием
Старый 28.10.2008, 14:01   #10
Kostia
Участник клуба
 
Аватар для Kostia
 
Регистрация: 21.11.2007
Сообщений: 1,690
По умолчанию

Я не помню откуда взялся этот файл, но факт остается фактом
http://s1.dump.ru/viewer/1160701/
Его неможет открыть ни один из имеющихся проигрывателей кроме Winamp, за что ему уважуха.
Файл залить не могу, постоянно дает ошибку, а правильно переименованный файл думаю не нужен.
Ошибка возникает при поиске "Невозможно открыть файл "...\MAXIM - ????????" синтаксическая ошибка в имени файла..."
Kostia вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как открыть для редактирования ID3-тэги mp3-файлов? Delphi yourself Мультимедиа в Delphi 2 13.11.2007 02:16
MediaPlayer - как сделать последовательное воспроизведение mp3 файлов (именно mp3) Kashp Компоненты Delphi 13 28.09.2007 08:38
Поиск файлов necky Общие вопросы Delphi 10 31.08.2007 00:27
Чтение MP3 файлов из папки PAVEL315 Общие вопросы Delphi 1 03.03.2007 13:33