Sound aufnehmen

[Sunlight7]

Zitat von DevStar:

Delphi-Quellcode:

procedure TForm2.FormCreate(Sender: TObject);
var
  Format: tWAVEFORMATEX;
begin
  with Format do
  begin
    wFormatTag := WAVE_FORMAT_PCM;
    nChannels := 1;
     wBitsPerSample := 8;
     nSamplesPerSec := 44100;
      nBlockAlign := nChannels * (wBitsPerSample div 8);
     nAvgBytesPerSec := nSamplesPerSec * nBlockAlign;
    cbSize := 0;
  end;
 wave := TWaveIn.Create;
 wave.OnData := OnData;
 wave.open(0);
 waveOutOpen(@fHandle, 0, @format, 0, 0, CALLBACK_NULL);
end;

Ich brauch das vox-Format ADPCM.

Weiß jemand wieso?

Wo hast Du hier ne Änderung? Du hast auf PCM, 8 Bit, 44.1 KHz, Mono eingestellt

[DevStar]

Zitat von Sunlight7:

Wo hast Du hier ne Änderung? Du hast auf PCM, 8 Bit, 44.1 KHz, Mono eingestellt

Nirgends, es ist immer Stereo, 16bit, 44000 khz. Das meinte ich.

Egal wie ich die Werte ändere.

[AlexII]

overmoon schreib doch dein Tut zu ende, nämlich das mit der Konvertierung der .wav nach .mp3

[Die Muhkuh]

Zitat von AlexII:

overmoon schreib doch dein Tut zu ende, nämlich das mit der Konvertierung der .wav nach .mp3

Einfach die Wave-Datei an die lame_enc.exe übergeben (oder die DLL nutzen), die konvertiert das ganze dann.

[AlexII]

Ja wenn das einfach ist, dann braucht man auch dieses Tut nicht, ist ja auch einfach

[Jakob Ullmann]

Zitat von AlexII:

Ja wenn das einfach ist, dann braucht man auch dieses Tut nicht, ist ja auch einfach

Was ist denn daran bitte so schwer? -> ShellAPI.ShellExecute()

[DevStar]

Und wie kann ich eine WAV-Datei in eine VOX ADPCM konvertieren?

[DevStar]

Zitat von DevStar:

Und wie kann ich eine WAV-Datei in eine VOX ADPCM konvertieren?

Anscheinend gibt es hier wohl keine Lösung in DELPHI.

Aber möglich muss es doh sein. Verwndet niemand von euch diese Vox-Dateien oder sind die zu spezifisch, dass die nur in Dialogic-Systemen verwendung finden?

Ich wäre sehr dankbar, wenn jemand einen Tipp hätte.

[ReneHSZ]

Wie kann man die Frequenzen der Aufnahme herausbekommen???

LG Rene

[Medium]

Fourier Transformation