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

Вниз

Почему то когда записываю звук с микрофона через TMediaPlayer кач   Найти похожие ветки 

← →
Кен   (2002-11-28 07:25) [0]

ество намного хуже чем когда через SoundForger. Уровень помех намного выше. Как решить проблему ? С чем может быть связано ?

Делаю так :

procedure TForm1.Button1Click(Sender: TObject);
begin
MediaPlayer1.FileName := dir1 + "calibrate.wav";
MediaPlayer1.Open;
MediaPlayer1.Wait := False;
MediaPlayer1.StartRecording;
Timer1.Enabled := True;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Timer1.Enabled := False;
MediaPlayer1.Stop;
MediaPlayer1.FileName := dir2 + "newfile.wav";
MediaPlayer1.Save;
MediaPlayer1.Close;
end;


В чём может быть ошибка ? Имеет ли значение какие параметры у файла calibrate.wav ? У меня он 16 бит 44100 герц моно.

---

← →
Карелин Артем ©   (2002-11-28 11:07) [1]

>>У меня он 16 бит 44100 герц моно.
Когда я занимался подобными опытами, моя звуковуха плохо писала моно звук. Какая-то ESS была.

---

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

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

Наверх

Память: 0.46 MB
Время: 0.012 c