01.10.2012, 16:13
|
|
Профессионал
|
|
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
|
|
Цитата:
Сообщение от Dmitry_DM
Так можно сделать?
Код:
if WavInfo.WaveFormat.nChannels = 2
then Xch:=S/(NumSamples*2)
else Xch:=S/NumSamples;
|
Вместо этого лучше так:
Код:
Xch := S / (NumSamples * WavInfo.WaveFormat.nChannels)
|