delphi2007 教程

关于左右声道切换的问题 CDSoftwareWj 进来 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiMultimedia/html/delphi_20061015125046242.html
我希望播放影音文件时控制系统的左右声道切换，  
  是左右声道同时播放左声道的音频或同时播放右声道的音频。  
   
  搜索后发现只有CDSoftwareWj回复的一篇代码好象有点道理，于是按上面去做。  
  代码中    
  mciSendCommand(Form1.MediaPlayer1.DeviceID,MCI_SETAUDIO,       MCI_SET_OFF       ,integer(@s));  
  是关闭声音  
   
  mciSendCommand(Form1.MediaPlayer1.DeviceID,MCI_SETAUDIO,       MCI_SET_ON       ,integer(@s));  
  是打开声音  
   
  可在这两代码之间的  
  s.dwValue:=MCI_DGV_SETAUDIO_SOURCE_Left;  
  并没有起到声道切换的作用，完全没有任何效果。  
   
  请问谁有好方法、好例子？  
  （ps：不要发单独控制左右声道音量的例子。）  
   
  CDSoftwareWj相关帖子：  
  http://topic.csdn.net/t/20020420/15/662797.html#Reply_4358704  
  http://topic.csdn.net/t/20031106/22/2435572.html

来一高手解决问题啊

mark  
 

http://topic.csdn.net/t/20020420/15/662797.html

找我就找对淫了   哇哈哈哈

20   分~~   太少了吧   多加点   ^^!

这问题时间太久了，要给你找找

http://topic.csdn.net/t/20031106/22/2435572.html  
   
  汗~~   我这个帖子里的代码不是就行么   -_-||  
   
  1.   播放中一定要先关闭声音，否则没效果  
  2.   设置声道  
  3.   //下面的MCI_DGV_SETAUDIO_VALUE       一定不能少            
  这里也很关键                     err:=mciSendCommand(MediaPlayer11.DeviceID,MCI_SETAUDIO,MCI_DGV_SETAUDIO_VALUE       or       MCI_DGV_SETAUDIO_ITEM       ,integer(@s));      
           
  4.   重新打开就行了  
   
  就是这样的过程