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

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

Вернуться   Форум программистов > Низкоуровневое программирование > Win Api
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 08.10.2007, 18:01   #1
XuMuK
Пользователь
 
Регистрация: 08.10.2007
Сообщений: 11
Хорошо Текущий уровень звука !

Пожалуйста помогите, как замерить текущий уровень звука
в Видовсе, не на микрофоне или лин. входе.
И если можно, скинтье ссылку, где б было рассказано про
программирование звука в Винде (просто).
Заранее спасибо !!!!
XuMuK вне форума Ответить с цитированием
Старый 10.10.2007, 16:19   #2
Миша
Пользователь
 
Регистрация: 13.09.2007
Сообщений: 63
По умолчанию

Не знаю смогу ли помочь тебе но что то похожее рассматривалось здесь.
Миша вне форума Ответить с цитированием
Старый 11.10.2007, 10:21   #3
Квэнди
Старожил
 
Аватар для Квэнди
 
Регистрация: 13.12.2006
Сообщений: 3,859
По умолчанию

function GetWaveVolume: DWord;
var
Woc: TWAVEOUTCAPS;
Volume: DWord;
begin
result := 0;
if WaveOutGetDevCaps(WAVE_MAPPER, @Woc, sizeof(Woc)) = MMSYSERR_NOERROR then
if Woc.dwSupport and WAVECAPS_VOLUME = WAVECAPS_VOLUME then
begin
WaveOutGetVolume(WAVE_MAPPER, @Volume);
Result := Volume;
end;
end;
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи
Квэнди вне форума Ответить с цитированием
Старый 11.10.2007, 10:25   #4
Alex21
With best regards
Участник клуба
 
Регистрация: 20.04.2007
Сообщений: 1,448
По умолчанию

Квэнди, добавлю uses MMSystem
Alex21 вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Условие на текущий год. ГОСЕАН БД в Delphi 2 27.06.2008 11:27
Delphi 6 - Программа должна узнать уровень загруженности процессора Никки Общие вопросы Delphi 3 20.11.2007 19:40
Задача по паскалю. 3 уровень. Сергей1 Помощь студентам 4 20.11.2007 11:20
Задача по Паскалю. 1 уровень сложности. Сергей1 Помощь студентам 2 19.11.2007 22:45
Уровень значимости Assembler'а сегодня [Kaiser] Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 15 07.09.2007 09:05