关于利用direct show做VCD播放软件中，声道控制问题！(100分)

  • 主题发起人 主题发起人 lxmzm
  • 开始时间 开始时间
L

lxmzm

Unregistered / Unconfirmed
GUEST, unregistred user!
如果利用delphi的媒体播放控件时，可以得到deviceID,利用mci很容易实现左右声道的互换等功能
在使用direct show进行播放VCD时，那又如何得到deviceID呢？如果不能，又如何利用MCI或direct shound
来进行左右声道的互换等功能的实现？

请大虾门指点迷津！thanks!
 
direct 编程？？？？？？？
关注！！！！！！！！！！！！！！
 
GraphBuilder.QueryInterface(IID_IBasicAudio, BasicAudio);
BasicAudio.put_Balance(xxx);
 
GraphBuilder.QueryInterface(IID_IBasicAudio, BasicAudio);
好象只能控制左右平衡吧！如：左声道最大，右声道无声音等，以上lxmzm提到的我想是：
如何同时播放左声道或右声道的声音。
 
coldease说的对,我太大意了.
关注.
 
我好象和你提出是个问题
 
就这里的问题，我想问各位大侠一下，如何实现象超级解霸一样在播放VCD的时候可以
控制伴音输出和视频输出。
 
用Dspack控件
http://www.progdigy.com/download/dspack1.05.rc1(20-11-2001).zip

var
MpegFilter: IBaseFilter;
MpegAudioDecoder: IMpegAudioDecoder;
begin

DSFilterGraph21.FilterGraph2.FindFilterByName('MPEG Audio Decoder',MpegFilter);
MpegFilter.QueryInterface(IID_IMpegAudioDecoder,MpegAudioDecoder);
MpegAudioDecoder.put_DualMode(AM_MPEG_AUDIO_DUAL_LEFT);
MpegFilter := nil;
MpegAudioDecoder :=nil;
end;

 
luket还是没实现左右声道互换
 
To:Luket
这个程序代码只适用于 VCD ，左声道，右声道和立体声播放。不适用于其它媒体。要
理解这个接口可以：
procedure TMainForm.SpeedButton6Click(Sender: TObject);

procedure ChangeAudio(S:String);
var
BaseFilter: IBaseFilter;
begin

FilterGraph.FilterGraph2.FindFilterByName(StringToOleStr(S), BaseFilter);
ShowFilterPropertyPage(MainForm,BaseFilter);
end;


begin

ChangeAudio('MPEG Audio Decoder');
//MPEG1 声音设置，比如 VCD 等。
ChangeAudio('MPEG Layer-3 Decoder');
//MP3 声音设置，比如 MPEG4 等。
end;


To:LeeChange
要实现 DirectShow 的声音左右对换可以在 DirectSound Filter 之前 添加一个
TFM Audio Filter。这个你用一下 Luket 说的控件自带的 GraphEdit.Exe.就会明白的。
 
不太明白，具体怎么实现一个声道的声音从两个声道中发声？
或者怎么找FilterGraph的DeviceID？
 
我只知道用MCI播放VCD的时候切换伴唱/原唱，用drictshow俺也不知道：（
 
我想知道怎样用directshow实现画面的颜色控制
 
要实现真的软解压播放并控制"各种"视频文件的左右声道，必须象豪杰一样写一个自已的解码器
才行。当然最好是先了解清楚各种视频文件的格式再写。我个人认为DIRECTX它只是提供了
一个开发WINDOWS多媒体程序的接口，现在的DIRECTX8。0也只是提供的MPEG1 和 MPEG2的
支持，而且局限性很大，象大码流的MPEG2(*.vob)有时播放就不正常。即使实现了软解压MPEG2，
它在图像方面的处理非常依赖CPU和显卡的性能，在性价比方面并不占优。因此，我认为如
果是作VOD系统,用户没有特别的要求，用硬解压(解压卡现在很便宜)较好些。

to：风云再起
DSPACK控件可以实现你的要求,我用它完成了一个软解压的VOD系统并且实现了你说的功能。
 
我也想知道这个问题
 
DS还是很好用的
 
procedure TForm1.Button4Click(Sender: TObject);
var
MpegFilter: IBaseFilter;
MpegAudioDecoder: IMpegAudioDecoder;
begin

with ((MediaPlayerx1.DefaultInterface as IActiveMovie).FilterGraph as IFilterGraph)do

FindFilterByName(StringToOleStr('MPEG Audio Decoder'), MpegFilter);
MpegFilter.QueryInterface(IID_IMpegAudioDecoder,MpegAudioDecoder);
MpegAudioDecoder.put_DualMode(AM_MPEG_AUDIO_DUAL_RIGHT);
MpegFilter := nil;
MpegAudioDecoder :=nil;
end;

 
to silicon:

MediaPlayerx1 指的是什么？
 
您必须登录或注册才可回复。

Similar threads

Ray
[转]终于可以发布Delphi下收点OSGI精髓皮毛而设计的插件框架WisdomPluginFramework
回复
4
查看
4K
chlkuei
C
J
如何用Magic CD Burner或CDWriteXP在程序中制作VCD盘，可用于VCD机播放(100分)
回复
7
查看
211
zl
Z
S
请问在播放wav时，怎样把一个声道的声音复制到另一个声道？急!请高手帮忙!!(200分)
回复
7
查看
245
wukw
W
J
各位高手，关于左右声道的问题！急！急！急！ 是DSPack这个控件 (100分)
回复
14
查看
202
jeven
J
C
如何不用快捷键而是用程序来控制媒体播放器的播放/暂停。。。。(50分)
回复
3
查看
224
Caicheng
C
后退
顶部