Aufgenommener Sound ist stumm

[Neutral General]

Ich nehme mit diesem Verfahren Sound auf :

Was gerade läuft aufnehmen

Start :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  mciSendString('OPEN NEW TYPE WAVEAUDIO ALIAS mysound', nil, 0, Handle);
  mciSendString('SET mysound TIME FORMAT MS ' +     
    'BITSPERSAMPLE 16 ' +                
    'CHANNELS 2 ' +                    
    'SAMPLESPERSEC 44100 ' +             
    'BYTESPERSEC 176400 ',
    nil, 0, Handle);
mciSendString('RECORD mySound',nil,0,Handle);
end;

Stop :

Delphi-Quellcode:

procedure TForm1.Button3Click(Sender: TObject);
begin
  mciSendString('STOP mySound',nil,0,Handle);
end;

Speichern :

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
  mciSendString(pChar('SAVE mySound' + ' "' + Edit1.Text + '"'),nil,0,Handle);
  mciSendString('CLOSE mySound',nil,0,Handle);
end;

Wenn ich mir die Datei anhöre die ich aufgenommen hab bekomme ich nichts zu hören ...
Woran kann das liegen ?