Interface 'IAudioEndpointVolume' läuft unter TurboDelphi aber nicht unter Delphi10.1?

[t.roller]

Oder so mit CheckBox:

Delphi-Quellcode:

procedure TForm1.cbMUTEClick(Sender: TObject);
var b: LongBool;
begin                 //Mute on/off
 if endpointVolume = nil then Exit;
 b := cbMUTE.Checked;
 endpointVolume.SetMute(b, nil);
end;