Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

звук [D2005]


gefest80 ©   (2008-04-08 21:17:00) 

Уважаемые знатоки! Скажите, а как можно програмно изменить уровень звука в XP и VISTA? Я так понимаю нужно использовать функции API


app   (2008-04-09 16:12:00) [1]

> gefest80  (08.04.2008 22:01:05)  [5]

Повежливее, чувтсвую бить тебя будут.


AIK   (2008-04-08 22:07:00) [2]

Uses mmsystem, ..
...
...
procedure MyVolume(const Volume: DWord);
var X : TWAVEOUTCAPS;
begin
if WaveOutGetDevCaps(WAVE_MAPPER, @X, sizeof(X)) = MMSYSERR_NOERROR then
if X.dwSupport and WAVECAPS_VOLUME = WAVECAPS_VOLUME then WaveOutSetVolume(WAVE_MAPPER, Volume);
end;
....


Пользуешся к примеру так:
var
LeftVolume: Word;
RightVolume: Word;
begin
MyVolume(MakeLong(LeftVolume, RightVolume));
end;


gefest80   (2008-04-08 22:01:00) [3]

Удалено модератором


Сергей М,   (2008-04-08 21:47:00) [4]

"Уровень звука" - эт чиво такое ?
Звук - это ж не сливной бачок, "уровень звука" в котором знаком многим, если не каждому, и угрожающее "превышение" которого грозит вселенским потопом, если его не "контролировать")..


Palladin   (2008-04-08 21:45:00) [5]

поуважительней это вот так:
Тема: Контроль общего уровня звука
Вопрос: подскажите в каком направлении копать, разделы MSDN, и/или функции API которые за это отвечают

Примечание:  Есть ли отличия стандартных подходов и подходов к этому в OS WinXP и Vista


gefest80   (2008-04-08 21:35:00) [6]

ну хотел как лучше, поуважительнее....


Palladin   (2008-04-08 21:27:00) [7]

сам ты знаток


Наверх

Титульная страница Поиск, карта сайта Написать письмо