求教！用Quartz.dll开发的播放器，声道切换的问题。

wbymh 2004-08-27 12:44:46

我用Quartz.dll做的一个vcd播放器，在网上找了很久也没有找到方法，如何能让两个音箱发左声道的声音或是右声道的声音，请那位高手教教小弟，谢谢了

...全文

291 16 打赏收藏转发到动态举报

写回复

用AI写文章

16 条回复

切换为时间正序

请发表友善的回复…

发表回复

jam021 2004-09-27

打赏
举报

关注,帮你顶!

newwish2 2004-09-26

打赏
举报

我也很想知道！！！
怎样使两个音箱都发原唱（或都发伴唱）的音，
很多人问，但没人能给出有力答案！
真令人沮丧！

幻影时空 2004-09-09

打赏
举报

To lianghong(寂寞水手)
这个似乎不是声道呀..只是平衡的音量

要声道是对视频的(VCD)声道的转换的(左、右、中)各类语言的！

我也急哟！

幻影时空 2004-09-09

打赏
举报

知道的高手来,来一下吧!

我也很需要!

wbymh 2004-08-31

打赏
举报

请教高手！教教我

wbymh 2004-08-30

打赏
举报

但是！只有一边的音箱有声音，另一边没有。

lianghong 2004-08-28

打赏
举报

Dim iBA As IBasicAudio
dim PMC as FilgraphManager
Set PMC = New FilgraphManager
Set iBA = PMC

If iMute Then ' 设置静音
iBA.Volume = -10000 '音量最小
Else
iBA.Volume = GetPicVolumeValue(picButton.Left)
End If

'balance的有效范围是(-10000,10000)
' If bolLChannel Then '左声道
' If iBA.Balance <> -10000 Then iBA.Balance = -10000
' ElseIf bolRchannel Then '右声道
' If iBA.Balance <> 10000 Then iBA.Balance = 10000
' ElseIf bolLChannels = False And bolRchannels = False Then '双声道
' If iBA.Balance <> 0 Then iBA.Balance = 0
' End If
set iBA = nothing

lianghong 2004-08-28

打赏
举报

QuartzTypeLib

当你在VB:工程／引用菜单下引用了 ActiveMovie control type library
(Quartz.dll) 后，FilgraphManager 这个对象就会出现在"对象浏览器"中，
使用 dim PMC as FilgraphManager，就是引用这个对象.