WAVE-Sound über Soundkarte aufnehmen

[3_of_8]

Morgen.

Ich versuche momentan, WAVE-Sounds über die WaveIn-Funktionen von MMSystem aufzunehmen.

Mein Ansatz:

Delphi-Quellcode:

var WaveHdr: TWaveHdr
    ID: HWAVEIN;
    Format: TWaveFormatEx;
begin
  Format.wFormatTag:=0;
  Format.nChannels:=1;
  Format.nSamplesPerSec:=SampleRate;
  Format.wBitsPerSample:=16;
  Format.nAvgBytesPerSec:=2*SampleRate;
  Format.nBlockAlign:=2;
  Format.cbSize:=sizeof(Format);
  waveInOpen(@ID, Device, @Format, 0, 0, 0);
  waveInPrepareHeader(ID, @wavehdr, sizeof(wavehdr));
  waveInAddBuffer(ID, @wavehdr, sizeof(wavehdr));
  waveInStart(ID);
  
  //1 Sek. später
  waveInStop(ID);
  waveInClose(ID);
end;

Dummerweise ist WaveHdr jedoch komplett mit Nullen gefüllt. Warum?

[inherited]

Schau dir mal das an: http://www.swissdelphicenter.ch/de/showcode.php?id=132

[3_of_8]

1. Will ich das ohne MCI machen (und auch ohne BASS)
2. Will ich die eingelesenen Daten nicht in eine Datei speichern, sondern in ein Array/einem Stream haben.

[SirThornberry]

hast du dir denn mal "TWaveHdr" angeschaut? Nirgendwo initialisierst du die Variable. Und wenn du dir in der Hilfe den Typ anschaust wirst du sehen das du da einen Pointer auf deinen Datenpuffer etc. angeben musst. Ohne Hilfe anschauen wirst du bei diesem Thema nicht weit kommen

[3_of_8]

*kratz*

Ich dachte, das ist eine Ausgabevariable für das ganze... Wo finde ich denn die Dokumentation für diese Funktionen?

[SirThornberry]

eine Dokumentation der Funktionen gibt es im MSDN

An dieser Stelle hier hab ich mal das ganze für die Ausgabe gepostet, das Prinzip ist aber das gleiche nur das eben der Puffer in deinem fall die Daten danach enthält und nicht damit gefüttert werden muss.
http://www.delphipraxis.net/internal...=657793#657793

Für den Einstieg in das Thema finde ich das Buch: Delphi Win32 Multimedia-Api von Alan C. Moore ganz gut.
Allerdings weiß ich nicht ob es dieses Buch noch gibt da auf meinem Exemplar noch DM-Preise stehen.
Achja, das Buch ist vom S&S Verlag.