老问题:声道控制!300分!(300分)

  • 主题发起人 主题发起人 【小高】
  • 开始时间 开始时间
WMV格式的文件能不能有方法控制声道(原声和伴唱)呢???
今天我在一台810板子上waveoutSetVolume设置了
是可以的,可是,在笔记本上,和另一台机器就不行了,
那810的声卡好像不同,??????????????????
 
http://61.132.118.185:8080/dispdocnew.php?id=4645
有详细方法
 
to iloveqq
我没办法打开上面那个页面呀,能贴出来吗?
 
我能打开,内容如下

现已有54个功能(仅菜单上能看到的,另外,其它功能模块
为一一注明.(我很想要一个能够在各个平台上能够使用
的屏幕抓词功能好用的和一个好理解的最初级的多线程
的源码,希望有的朋友跟我联系)

最近更新:2003.5.10 版本号:0.53.54
1.解决PubFunUnit使用Flatstyle构件的问题;
2.[图像相关]增加图像融合的例子;
3.[日期相关]增加阳历转转阴历演示;
4.[硬件相关]增加音量声道控制;
5.[操作相关]增加热健捕获的例子;
6.[数据库相关]增加调用数据库连接演示;
7.[系统相关]增加将本程序从IE菜单中添加删除;
8.[系统相关]增加创建桌面快捷方式;
9.[系统相关]增加创建菜单组;
10.[注册表操作]增加程序自启动项;
11.[注册表操作]增加注册表默认值写入和删除;(写入到
注册表中的启动中)

需要源码的朋友请和我联系,我会告知下载地址,得知下载地址的朋友,请不要到处乱发,我只是想知道有多少朋友下载了而已,谢谢合作!
 
上面的页面是 安平超级工具箱 0.53.54 执行文件
 
我也想知道这个问题
 
http://www.playicq.com/tools/toolbox05354exe.rar
 
多人接受答案了。
 
FilterGraph: TFilterGraph;

procedure TForm.AudioSel(Num: Word);
//Num -- 声轨的编号
var
DVDControl: IDVDControl;
begin

if FilterGraph.Active then

begin

if Succeeded(FilterGraph.QueryInterface(IID_IDVDControl, DVDControl)) then

begin

DVDControl.AudioStreamChange(Num);
end;

end;

DVDControl := Nil;
end;

上述代码能控制DVD左右声道,但我要控制自己压的MPEG4文件,左右声道是分开的,但是不知道怎么控制,大家顺便帮帮我,谢谢了
 

Similar threads

D
回复
0
查看
824
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部