Obter o nome do dispositivo de áudio completo do Windows

Question

Existe uma maneira de obter o completo nome do dispositivo de áudio no Windows XP e mais tarde?

Eu posso usar MIXERCAPS mas o membro szPname irá limitar a 32 caracteres (incluindo NULL). Para um nome de dispositivo de áudio de "Microfone (High Definition Audio Device)", eu só voltar "Microfone (High Definition Aud". Isto é devido ao MAXPNAMELEN sendo definido para 32. Eu tentei redefini-lo para um número maior ou nenhum efeito .

Aqui está o código que estou usando:

MIXERCAPS mc;
ZeroMemory( &mc, sizeof(MIXERCAPS) );
mm = mixerGetDevCaps( reinterpret_cast<UINT_PTR>(m_hMixer), &mc, sizeof(MIXERCAPS) );

esta questão , mas ele faz referência Vista e posterior.

Answer 1

Se você usar o clássico do Windows Multimedia Interface você provavelmente não pode contornar a limitação MAXPNAMELEN, uma vez que é compilado no próprio Windows.

No entanto, você pode ser capaz de obter o nome do dispositivo completo se você usar DirectSound vez. O código a seguir não foi testado, mas eu acho que ele deve funcionar.

BOOL CALLBACK EnumCallback(LPGUID guid, LPCSTR descr, LPCSTR modname, LPVOID ctx)
{
    std::vector<std::string> *names = (std::vector<std::string>*)ctx;
    names->push_back(std::string(descr));
    return TRUE;
}

int main()
{
    std::vector<std::string> names;
    if (!FAILED(DirectSoundEnumerate(&EnumCallback, &names)))
    {
        // do stuff
    }
}

Answer 2

Você pode tentar usar DevCon. Disponível no site da Microsoft aqui .

Eu acho devcon listclass mídia pode lhe dar o resultado que você está procurando.

Answer 3

Abaixo está o meu código (Delphi):

Esta é usando DirectShow / ActiveX, É enumurates dispositivos DirectSound, que incluem dispositivos embrulhadas waveOut bem.

procedure EnumAudioDevices;
var
  dsCreateDevEnum  : ICreateDevEnum;
  EnumDevice       : IEnumMoniker;
  DeviceMoniker    : IMoniker;
  Data             : Integer;
  DevicePropBag    : IPropertyBag;
  DeviceName       : OLEVariant;
  I                : Integer;
begin
  // CLSID_CQzFilterClassManager = Entire DirectShow Filter List
  If CoCreateInstance(CLSID_SystemDeviceEnum,nil,CLSCTX_INPROC_SERVER,IID_ICreateDevEnum,dsCreateDevEnum) = S_OK then
  Begin
    If dsCreateDevEnum.CreateClassEnumerator(CLSID_AudioRendererCategory,EnumDevice,0) = S_OK then
    Begin
      I := 0;
      EnumDevice.Reset;
      While EnumDevice.Next(1,DeviceMoniker,@Data) = S_OK do
      Begin
        If DeviceMoniker.BindToStorage(nil,nil,IID_IPropertyBag,DevicePropBag) = NOERROR then
        Begin
          If DevicePropBag.Read('FriendlyName',DeviceName,nil) = NOERROR then
          Begin
            // Success
            ShowMessage(DeviceName);
            Inc(I);
          End;
          DevicePropBag := nil;
        End;
        DeviceMoniker := nil;
      End;
      EnumDevice := nil;
    End;
    dsCreateDevEnum := nil;
  End;
End;