Вниз
Скачать: CL | DM;

Мощный звук   Найти похожие ветки 

← →
SpyBoy ©   (2005-07-17 21:01) [0]

Как в несколько раз увеличить громкость динамиков?


← →
ххх   (2005-07-17 21:53) [1]

Купить динамики помощьнее :)


← →
Marser ©   (2005-07-18 00:23) [2]

УЗЧ помощнее. Если динамики выдержат - хорошо :-))


← →
SpyBoy ©   (2005-07-18 00:58) [3]

ххх   (17.07.05 21:53) [1]
Marser ©   (18.07.05 00:23) [2]

А как насчёт этого:
procedure TForm1.TrackBar1Change(Sender: TObject);

var LValue,RValue:Word;

begin

LValue:=$FF-TrackBar1.Position;

RValue:=$FF-TrackBar2.Position;

waveOutSetVolume(0, (RValue SHL 8)+LValue);

end;


← →
ххх   (2005-07-18 04:16) [4]

А от этого динамики громче не станут, просто повысится амплитуда сигнала выходящего с аудиокарты.

А сам вопрос был именно о том, КАК УВЕЛИЧИТЬ ГРОМКОСТЬ ДИНАМИКОВ, именно динамиков, а не усилителя и аудиокарты.
Я сомневаюсь, что это можно сделать без покупки новых динамиков.

p.s. народ, умейте правильно задавать вопросы, какой вопрос - такой и ответ


← →
Sha ©   (2005-07-18 10:42) [5]

> ххх
> Купить динамики помощьнее :)

Неверно.
Вопрос в том, как в несколько раз увеличить громкость динамиков?
Т.е. как увеличить КПД, а не масимально воспроизводимую мощность.
Правильный ответ: купить динамики с большей отдачей.

> p.s. народ, умейте правильно задавать вопросы, какой вопрос - такой и ответ

Во-во. А еще умейте правильно отвечать :)


← →
Antonn ©   (2005-07-18 12:23) [6]


> Как в несколько раз увеличить громкость динамиков?

все проще - нужно увеличить громкость, а не пускаться в дебри про КПД, звуковое давление, диаметр купола и тп.

procedure SetWaveVolume(const AVolume: DWord);
var
Woc : TWAVEOUTCAPS;
begin
if WaveOutGetDevCaps(WAVE_MAPPER, @Woc, sizeof(Woc)) =
MMSYSERR_NOERROR then
if Woc.dwSupport and WAVECAPS_VOLUME = WAVECAPS_VOLUME then
WaveOutSetVolume(WAVE_MAPPER, AVolume);
end;

использование:
SetWaveVolume(MakeLong(TrackBar1.Progress*655,TrackBar2.Progress*655)); // max равен по 100, ессно...
//хотя там до 65535...


← →
Digitman ©   (2005-07-18 12:24) [7]


> SpyBoy ©   (18.07.05 00:58) [3]
> А как насчёт этого:


А где здесь идет речь о каких-то там "динамиках" ?


← →
SpyBoy ©   (2005-07-20 20:14) [8]

Antonn ©   (18.07.05 12:23) [6]
TWAVEOUTCAPS-что за тип и вкаком модуле лежит?


← →
XProger ©   (2005-07-20 21:36) [9]

mmSystem



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.024 c
2-1134029289
Свой
2005-12-08 11:08
2005.12.25
Tshape и глупенький вопрос:)


2-1134295439
Kais
2005-12-11 13:03
2005.12.25
текстовый файл


2-1134030679
Daria
2005-12-08 11:31
2005.12.25
Поиск по базе


6-1126682500
mrDEAD
2005-09-14 11:21
2005.12.25
помогите чем можете в написаниии проги


2-1134125888
kvorubin
2005-12-09 13:58
2005.12.25
Мужики, как сравнить 2 списка со словами???




   Наверх