Borland C++. MediaPlayer1 не пишет в файл

[Garic_]

Нет записи и нет файла c:\\test.wav пож. потскажите в чём дело?

void __fastcall TForm1::Button11Click(TObject *Sender)
{
   MediaPlayer1->DeviceType = dtWaveAudio;
   MediaPlayer1->FileName = "c:\\test.wav";
   MediaPlayer1->Open();
   MediaPlayer1->Wait = false;
   MediaPlayer1->StartRecording();
}

void __fastcall TForm1::Button12Click(TObject *Sender)
{
   MediaPlayer1->Stop();
   MediaPlayer1->Save();
   MediaPlayer1->Close();

[raxp]

а у вас присутствует звуковой файл <test.wav>? без него он работать не будет, его надо создать.

[Garic_]

поменял wav на рабочий wma не перезаписует и не дописует.

А если попробывать запись в буфер? Только не знаю как.

[raxp]

что значит поменял?

TMPDeviceTypes = (dtAutoSelect, dtAVIVideo, dtCDAudio, dtDAT, dtDigitalVideo, dtMMMovie,
    dtOther, dtOverlay, dtScanner, dtSequencer, dtVCR, dtVideodisc, dtWaveAudio)

где вы видите что он поддерживает его запись?

p.s.: создайте пустой wav в любом аудиоредакторе на пробу

----------------------
UPD
----------------------
предлагаю вам альтернативный вариант записи, через MCI:

uses mmsystem;

...
// ЗАПИСЬ
mciSendString('OPEN NEW TYPE WAVEAUDIO ALIAS mySound',nil,0,Handle);
mciSendString('SET mySound ' +
                   'TIME FORMAT MS ' +
                   'BITSPERSAMPLE 16 ' +
                   'CHANNELS 2 ' +
                   'SAMPLESPERSEC 44100 ' +
                   'BYTESPERSEC 176400 ' +
                   'ALIGNMENT 4',
                   nil,0,handle);
mciSendString('RECORD mySound',nil,0,Handle);
...

// СТОП И СОХРАНЕНИЕ
mciSendString('STOP mySound',nil,0,Handle);
mciSendString('SAVE mySound "ваш файл.wav"',nil,0,Handle);
mciSendString('CLOSE mySound',nil,0,Handle);

[Garic_]

пож. в готовом примере, чесно признаюсь для меня этот вариан сложный.
и в инт.... не чего не накопал.

[raxp]

последний пример готовее некуда, вставьте в свой пустой проект

[Garic_]

void __fastcall TForm1::Button1Click(TObject *Sender)
{
mciSendString(|-ударение на ошибку 'OPEN NEW TYPE WAVEAUDIO ALIAS mySound',nil,0,Handle);

Но кто нибдь потскажите пож. чо ругается. что я делаю не так?
А то я уже голову сломал, мне нужна запись? На вас народ надежда.

[Garic_]

чем отличается, положительно и отрицательно, написание программ с использованием mci или без его участия,
в пример аудио проигрователь, №1 с использованием mci, №2 без mci.

[Garic_]

Что лучше?
написание программ с использованием mci или без его участия,
в пример аудио проигрователь, №1 с использованием mci, №2 без mci.