Jump to content

Leaderboard


Popular Content

Showing most liked content on 12/19/2019 in all areas

  1. 2 points
    Consegui colocar Mute e Volume neste que usa a Ole32.dll e agora já dá prá incluir ele na minha lista de players também. Func IMediaControl_Mute(ByRef $IGraphBuilder, $opt = 0) If $opt = 0 Then IMediaControl_Vol($IGraphBuilder, $volume); 100 para volume total Else IMediaControl_Vol($IGraphBuilder, 0) EndIf GUICtrlSetData($lab_mute, "Mute: " & $opt) EndFunc ;==>IMediaControl_Mute Func IMediaControl_Vol(ByRef $IGraphBuilder, $vol = 50); Faltando $IMediaControl = GetIMediaControl($IGraphBuilder) If @error Then Return SetError(1, 0, False) ;-------IMediaControl Vol Virtual Method Number Is 46;---------------- $Rt = InterfaceCall($IMediaControl, "long", 46, "long", -Exp((100 - $vol) / 10.86)) ;-------IMediaControl Vol Virtual Method Number Is 46;---------------- GUICtrlSetData($lab_vol, "Vol: " & $vol) If @error Or $Rt[0] <> 1 Then CtrlGraphRelease($IMediaControl) Return SetError(2, 0, False) EndIf Return SetError(0, 0, True) EndFunc ;==>IMediaControl_Vol _DirectShow_Ole32.au3
×