Sound aufnehmen

[Tropby]

Wie geht denn das mit dem einzufügen ??

So ? :

Delphi-Quellcode:

  
Result := waveInOpen(@fHandle, aDevice, @Format, Cardinal(@waveInProc), cardinal(self), CALLBACK_FUNCTION);
for I := 1 to 5 do
  begin
    fWaveData := TWaveData.Create;
    fWaveData.Header.lpData := fWaveData.Data;
    fWaveData.Header.dwBufferLength := cWaveBufferSize;
    fWaveData.Header.dwFlags := 0;
    Result := waveInPrepareHeader(fHandle, @fWaveData.Header,cWaveBufferSize);
    Result := waveInAddBuffer(fHandle, @fWaveData.Header, cWaveBufferSize);
  end;

Und dann noch mal da wo ich die daten auswerte oder wie ??