Форум: "Начинающим";
Текущий архив: 2008.05.04;
Скачать: [xml.tar.bz2];
Вниззвук Найти похожие ветки
← →
gefest80 (2008-04-08 21:17) [0]Уважаемые знатоки! Скажите, а как можно програмно изменить уровень звука в XP и VISTA? Я так понимаю нужно использовать функции API
← →
Palladin © (2008-04-08 21:27) [1]сам ты знаток
← →
gefest80 (2008-04-08 21:35) [2]ну хотел как лучше, поуважительнее....
← →
Palladin © (2008-04-08 21:45) [3]поуважительней это вот так:
Тема: Контроль общего уровня звука
Вопрос: подскажите в каком направлении копать, разделы MSDN, и/или функции API которые за это отвечают
Примечание: Есть ли отличия стандартных подходов и подходов к этому в OS WinXP и Vista
← →
Сергей М, (2008-04-08 21:47) [4]"Уровень звука" - эт чиво такое ?
Звук - это ж не сливной бачок, "уровень звука" в котором знаком многим, если не каждому, и угрожающее "превышение" которого грозит вселенским потопом, если его не "контролировать")..
← →
gefest80 (2008-04-08 22:01) [5]Удалено модератором
← →
AIK © (2008-04-08 22:07) [6]
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;
← →
app © (2008-04-09 16:12) [7]> gefest80 (08.04.2008 22:01:05) [5]
Повежливее, чувтсвую бить тебя будут.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2008.05.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.009 c