Mixer Aufnahmelautstärke auslesen

[Wishmaster]

@igeal457

Du nimmst BASS_RecordGetInput anstatt BASS_RecordSetInput

En wenig Demo Code

Delphi-Quellcode:

{**************************** Input Set/Get Volume ****************************}

Function TBassEngine.Input_Set_Volume(Port, Value : integer) : Boolean;
begin
 if FBassDllLoaded then
   Result:= BASS_RecordSetInput(Port, BASS_INPUT_LEVEL or LOWORD(Value))
  else
   Result:= false;
end;

Function TBassEngine.Input_Get_Volume(Port : integer) : Integer;
begin
 if FBassDllLoaded then
  Result:=  LOWORD(BASS_RecordGetInput(Port))
 else
  Result:= 0;
end;