01.10.2012, 16:03
|
Активный
|
|
Регистрация: 07.08.2012
Сообщения: 258
Версия Delphi: Delphi 7
Репутация: 11
|
|
Цитата:
Сообщение от poli-smen
В NumSamples хранится количество сэмплов в одном канале. Если в звуковом файле один канал, то всё правильно, если же в звуковом файле 2 канала, то в этих циклах просуммируется в 2 раза больше сэмплов чем указано в переменной NumSamples, но потом при вычислении Xch мы делим на NumSamples, а не на (NumSamples*2).
|
Так можно сделать?
Код:
if WavInfo.WaveFormat.nChannels = 2
then Xch:=S/(NumSamples*2)
else Xch:=S/NumSamples;
|