feat: output device change

2025-01-13 21:46:12 +08:00
parent 5034866c8f
commit 7dff62aebf
1 changed files with 50 additions and 43 deletions
@@ -385,6 +385,13 @@ Public Module ModMusic
        Public Sub OnDefaultDeviceChanged(dataFlow As DataFlow, role As Role, defaultDeviceId As String) Implements IMMNotificationClient.OnDefaultDeviceChanged
            container.OnDefaultDeviceChanged(dataFlow, role, defaultDeviceId)
            ' 切换到系统默认输出设备
            If MusicNAudio IsNot Nothing Then
                Dim target As NAudio.Wave.WaveOut = MusicNAudio
                target.Stop()
                target.DeviceNumber = 0
                target.Resume()
            End If
        End Sub
        Public Sub OnDeviceAdded(deviceId As String) Implements IMMNotificationClient.OnDeviceAdded