|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
03.01.2017, 21:14 | #21 |
Пользователь
Регистрация: 05.02.2007
Сообщений: 91
|
а для разжатия я не нашел код , я его не разжимаю а отправляю сразу в waweout, заполнить правильно нужно только waweformatex под mp3.
на примере вот этого делал. С утечкой памяти работает уже минут 30 не затыкается все работает нормально только память сьела 100мб. почему так много я думаю что средствами windows он разжимает или конвертирует мp3 в wav, точно не знаю. Спасибо за ответы и помощь. Последний раз редактировалось АНАТОЛИЙ249; 03.01.2017 в 21:19. |
04.01.2017, 09:43 | #22 |
Пользователь
Регистрация: 05.02.2007
Сообщений: 91
|
Нашел еще сорцы для работы с mp3
|
04.01.2017, 12:28 | #23 |
Форумчанин
Регистрация: 16.12.2009
Сообщений: 902
|
Сейчас тоже пытаюсь сделать конвертацию на лету в mp3 и обратно без файла
нашел два кода этот конвертирует работает Код:
Код:
Код:
http://www.dependencywalker.com Последний раз редактировалось Aliens_wolfs; 04.01.2017 в 13:04. |
04.01.2017, 13:35 | #24 |
Пользователь
Регистрация: 05.02.2007
Сообщений: 91
|
Нашел вроде бы работает 1час не вылетает при сворачивании окон или разворачивании и утечки памяти нет, добавил sleep(100) в эту процедуру
procedure WaveOutProc(HWO: HWAVEOUT; uMsg: UINT; dwInstance, dwParam1, dwParam2: DWORD); stdcall; var iError: Cardinal; FPWavehdr: PWavehdr; begin with TBSTH(dwInstance) do try if (uMsg = WOM_DONE ) then begin FPWavehdr := PWavehdr(dwParam1); iError := WaveOutUnprepareHeader(HWaveOut1^, FPWavehdr, SizeOf(TWaveHdr)); if ierror=0 then begin GlobalUnlock(DWORD(FPWavehdr)); GlobalFree(DWORD(FPWavehdr)); end; sleep(100); end; except on E: Exception do end; end; Спасибо огромное что помогаете в разработке программ,за ответы и советы. |
04.01.2017, 13:50 | #25 |
Пользователь
Регистрация: 05.02.2007
Сообщений: 91
|
Вот то что я нашел на просторах интернета может кому пригодится.
|
04.01.2017, 14:19 | #26 |
Пользователь
Регистрация: 05.02.2007
Сообщений: 91
|
Проверил работает только для одного клиента , если 2 и более начинает вываливаться. Наверно надо искать как mp3 конвертировать в wav на лету . Тоже искал пробовал , но так и не сделал , вроде пишут что есть компонент ACS но не нашел в интернете для них DLL. сам компонент вложил там есть именно конвертирование MP3->Wav.
Cпасибо за ответы и помощь. |
04.01.2017, 14:52 | #27 |
Пользователь
Регистрация: 05.02.2007
Сообщений: 91
|
Вот еще может поможет .
|
04.01.2017, 15:09 | #28 |
Форумчанин
Регистрация: 16.12.2009
Сообщений: 902
|
Пример последний интересный, из него попробую из MP3->Wav сделать.
|
04.01.2017, 15:12 | #29 | |
Пользователь
Регистрация: 05.02.2007
Сообщений: 91
|
Вот для этой библиотеки не мог найти dll по моему 1 какую то весь нет переискал и везде пишут что тоже не могут найти dll.
Вот название DLL 'mp3decdr.dll' которой нет в NEWAC. Цитата:
Последний раз редактировалось АНАТОЛИЙ249; 04.01.2017 в 15:25. |
|
04.01.2017, 17:21 | #30 |
Пользователь
Регистрация: 05.02.2007
Сообщений: 91
|
Вот еще MPGlib_Dll
Последний раз редактировалось АНАТОЛИЙ249; 04.01.2017 в 17:51. |
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
[РЕШЕНО] bass.dll, Программа получает мп3 файл с сервера и воспроизводит его, как его сохранить в файл? | NEoMASTERR | Общие вопросы Delphi | 0 | 25.01.2016 11:30 |
BASS.DLL и захват потока. | Twister901 | Visual C++ | 1 | 15.01.2013 10:54 |
Bass.dll не воспроизводит m3u | demiancz | Мультимедиа в Delphi | 19 | 30.10.2012 08:46 |
bass.dll Скорость мать его потока... | Дворник | Мультимедиа в Delphi | 5 | 24.08.2010 09:37 |
микшер на два потока в проигрывателе музыки. проигрыватель сделан на основе библиотеки Bass.dll | D-fens | Мультимедиа в Delphi | 4 | 08.06.2007 20:36 |