Soundaufnahmequelle umstellen

[Die Muhkuh]

Hi,

ich verwende die Bass -> 2.0.

Ich würde aber lieber wissen, wie es ohne die Bass geht

Delphi-Quellcode:

  if not (BASS_Init(0, 41100, 0, Self.Handle, nil)) then
    raise Exception.Create('Konnte Bass nicht initialisieren');

  if not BASS_RecordInit(0) then
    raise Exception.Create('Konnte Record nicht initialisieren');

  if BASS_RecordGetInput(0) <> BASS_INPUT_TYPE_MIC then
  begin
    BASS_RecordSetInput(0, BASS_INPUT_TYPE_MIC);
  end;
  BASS_RecordFree();

  BASS_Free();