Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Регулятор громкости


Автор: Артем1 30.10.2011, 11:33
Здраствуйте форумчане. Помогите пожалуйсто. Сделал регулятор громкости , использовал объект RxSlider. При изменении громкости звук пропадает и все. В чем моя ошибка ? Помогите Пожалуйсто.

Код

procedure TForm1.RxSlider1Change(Sender: TObject);
begin
BASS_ChannelSetAttribute(stream,BASS_ATTRIB_VOL,0);
end;

Автор: jhonyxakep 30.10.2011, 14:34
Цитата(Артем1 @  30.10.2011,  11:33 Найти цитируемый пост)
Здраствуйте форумчане. Помогите пожалуйсто. Сделал регулятор громкости , использовал объект RxSlider. При изменении громкости звук пропадает и все. В чем моя ошибка ? Помогите Пожалуйсто.


В руках, и нечтении мануалов.

RxSlider1.MinValue :=0;
RxSlider1.MaxValue :=100;

BASS_ChannelSetAttribute(stream,BASS_ATTRIB_VOL,RxSlider1.Value/100);


Автор: Артем1 30.10.2011, 18:04
Большое тебе спасибо . Все получилось.

Автор: CROTishka 31.10.2011, 10:09
тогда уж RxSlider1.Value/RxSlider1.MaxValue

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)