Форум на Исходниках.RU

Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809562 Sat, 22 Jan 2011 21:39:41 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809562 Цитата

наша программа если не главная может получать сообщение раз в 4 секунды

Что-то я ничего не понял. :-?]]> Prince Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809465 Sat, 22 Jan 2011 19:32:12 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809465 Цитата Pavia @ 22.01.11, 17:04

Уменьшать число буферов не хочу что бы не заикалось. Так как в виндоусе вытесняющая многозадачность, то главный поток забирает все и чисто теоретически наша программа если не главная может получать сообщение раз в 4 секунды. Поэтому и хочу запас.

Вообще-то стандартное решение - повысить приоритет звукового потока.]]> andriano Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809334 Sat, 22 Jan 2011 17:04:07 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809334 Prince
На 1024 у меня уже система не справляется приходит одно сообщение на 2 буфера. Приходилось усложнять обработку.

Уменьшать число буферов не хочу что бы не заикалось. Так как в виндоусе вытесняющая многозадачность, то главный поток забирает все и чисто теоретически наша программа если не главная может получать сообщение раз в 4 секунды. Поэтому и хочу запас.

Цитата Prince @ 22.01.11, 16:30

Кстати, объясните кто-нибудь практическое применение сквозного канала вообще.

Как известно если A+(-A) будет 0. То есть если подать на выход, то что поступило на вход но с обратным знаком, то получим тишину. Известный факт.

Хочу попробовать фокус сделать человек говорит программа выделяет признаки конкретного человека и выдает его звук, но в обратном порядке. Разумеется нужна некоторое предсказание. А другие люди должны говорить свободно. Типо лишаем голоса одного человека. :blush: Правда уверен что не получится.]]> Pavia Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809319 Sat, 22 Jan 2011 16:30:15 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809319

Цитата

По хорошему надо запас буферов на 4 секунды.

А для чего?

Кстати, объясните кто-нибудь практическое применение сквозного канала вообще.]]> Prince Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809299 Sat, 22 Jan 2011 16:16:14 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809299 Prince
Да проверил потери нет.

А вот возьмем 100 буферов и сразу будет заметна задержка в воспроизведение. Её бы уменьшить.
При 16 тоже заметно, а уменьшать не хотелось бы. По хорошему надо запас буферов на 4 секунды.]]> Pavia Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809280 Sat, 22 Jan 2011 15:52:38 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809280 Цитата

Только надо переделать чтобы буферы чередовались.

В каком смысле чередовались? Буфер, вернувшийся из очереди записи, ставится в очередь воспроизведения. Буфер, вернувшийся из очереди воспроизведения, ставится в очередь записи. Такой себе дружественный обмен. Буферов может быть хоть до сотни. И в очереди всегда находится примерно половина.

Цитата

А как насчёт потери данных пока буферы воспроизводятся?

Данные не теряются, разрыва в данных нет, а на слух, разрывы в воспроизводимом звуке могут быть, например, во время сворачивания формы, поскольку события аудио в оконной процедуре обрабатываются.

Разрывы есть, во время манипуляций с формой, перемещения, сворачивания. Механизм "затыкания" звука", как там и чего происходит, я не могу объяснить. Понимаю, что связано с обработкой сообщений аудио в общей очереди сообщений, если перенести обработчик аудио в отдельный поток с уведомлением callback_event, разрывов быть не должно.

Может, я что-то не учел, замечания, указания на ошибки, или ошибочность решения в целом, с благодарностью принимаю.]]> Prince Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809269 Sat, 22 Jan 2011 15:44:45 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809269 Prince
Если судить по примеру то там записывается половина потом воспроизводится. Что не плохо. Только надо переделать чтобы буферы чередовались.
А как насчёт потери данных пока буферы воспроизводятся?]]> Pavia Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809169 Sat, 22 Jan 2011 14:22:17 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809169 Виктор Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809032 Sat, 22 Jan 2011 10:41:56 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2809032 В примере показан учет количества активных буферов. Можно обойтись и без него. Processmessages перед закрытием устройств успешно обрабатывает все сообщения wim_data wom_done, так что перед waveinclose/waveoutclose сообщения уже обработаны(память под заголовки и буферы совобождена). Но так, имхо, легче проследить механизм перекидывания буферов друг другу, обработчиками событий wim_data и wom_done.

______________.zip (, : 516) ]]> Prince Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2808886 Sat, 22 Jan 2011 00:19:46 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2808886 Цитата Виктор @ 17.01.11, 13:36

Это в хорошем смысле или нет?

Канешна, в харошем!]]> MIF Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2804585 Mon, 17 Jan 2011 17:50:06 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2804585 Pavia Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2804545 Mon, 17 Jan 2011 16:57:37 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2804545 Цитата Виктор @ 16.01.11, 21:23

(в зависимости от того, кого первого инициировали).

А когда второго инициируешь - все нормально? В плане возврата функцией открытия устройства результата (который ты не проверяешь, а проверку закоментировал и удалил за "ненадобностью"). :D

Добавлено 17.01.11, 16:59
О...уже разобрались... :D]]> medved_68 Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2804542 Mon, 17 Jan 2011 16:53:38 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2804542 Виктор
Отладил твой код. waveOutWrite возвращается с WAVERR_STILLPLAYING. Если верить сообщению то что-то уже воспроизводится. Можно предположить что при записи звук уже воспроизводится через колонки. И ручками ничго делать не надо. А да ну при этом звук с микрофона может фильтроваться драйвром звуковой(там настройка есть).]]> Pavia Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2804278 Mon, 17 Jan 2011 13:36:39 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2804278 У меня нэтбук Asus.

Добавлено 17.01.11, 13:37

Цитата MIF @ 17.01.11, 11:43

Мозг...

Это в хорошем смысле или нет? :D]]> Виктор Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2804068 Mon, 17 Jan 2011 11:43:03 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2804068 MIF Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2803660 Sun, 16 Jan 2011 21:23:37 +0000 waveIn и WaveOut в паре https://forum.sources.ru/index.php?showtopic=323411&view=findpost&p=2803660 Столкнулся с такой проблемой: при одновременной работе waveIn и WaveOut работает только прием сообщений от либо от waveIn, либо от WaveOut (в зависимости от того, кого первого инициировали). По отдельности (если инициировать либо только снятие с микрофона либо только воспроизведение) все сообщения (MM_WIM_DATA или MM_WOM_DONE соответственно) проходят нормально.
Что за странные дела?
Спасибо за помощь.

Исходник привожу.

waveInOut.rar (, : 429) ]]> Виктор Delphi: Общие вопросы