Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.17;
Скачать: CL | DM;

Вниз

Регулятор звуга в проге   Найти похожие ветки 

 
Rip   (2003-03-26 13:24) [0]

Подскажите как регулировать громкость звука из моей программы!
Заранее ПАСИБО!!!


 
AlexT1000   (2003-03-26 16:13) [1]

procedure TFormMain.TrackBar1Change(Sender: TObject);
Var i:dword;
begin
i:=TrackBar1.Position;
i:=byte(i) shl 8 or byte(i);
waveOutSetVolume(0,i);
end;

TrackBar1.Position 0 - 255
i:=byte(i) shl 8 or byte(i); - установка одного уровня громкости для правого и левого динамика



 
Intell ©   (2003-03-28 18:51) [2]

AlexT1000, Прочёл твой ответ, попробовал, но меняется звук только в одной колонке, другая вообще молчит. Что не так?


 
AlexT1000   (2003-03-28 19:26) [3]

MMRESULT waveOutSetVolume(

HWAVEOUT hwo,
DWORD dwVolume
);


Parameters

hwo

Handle of an open waveform-audio output device. This parameter can also be a device identifier.

dwVolume

New volume setting. The low-order word contains the left-channel volume setting, and the high-order word contains the right-channel setting. A value of 0xFFFF represents full volume, and a value of 0x0000 is silence.
////!!!!!!!!!
If a device does not support both left and right volume control, the low-order word of dwVolume specifies the volume level, and the high-order word is ignored.
!!!!!!!!!!!



Страницы: 1 вся ветка

Текущий архив: 2003.07.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
4-55900
HollowMan
2003-05-13 15:42
2003.07.17
Как осуществить перерисовку и блокировку содержимого экрана?


7-55882
iZEN
2003-05-06 16:26
2003.07.17
Самостарт сервиса.


9-55380
Esc
2003-01-11 18:18
2003.07.17
Вопрос по OpenGL


11-55481
SPeller
2002-11-06 12:37
2003.07.17
Рассылка новостей KOL & MCK


3-55424
qwerty2
2003-06-24 09:55
2003.07.17
Locate по BLOB-полям