我想编一个能够控制左右声道和音量大小的程序(100分)

我不知道用哪些函数能够实现，请各位赐教.

现成控件也可以，谢谢！

auxgetvolme用于非波形文件（CD）
waveoutgetvolume用于波形文件，
左：
var
v,t:longint;
beign
t:=trackbar1.position;

auxgetvolme（MideaPlayer1.DeviceID-1,@v）;
v:=((t shl 8)or(v and$ffff0000));
auxsetvolme(MideaPlayer1.DeviceID-1,v);
end;

右：
var
v,t:longint;
beign
t:=trackbar2.position;

auxgetvolme（MideaPlayer1.DeviceID-1,@v）;
v:=((t shl 24)or(v and$ffff0000));
auxsetvolme(MideaPlayer1.DeviceID-1,v);
end;

Delphi天空里有个这样的控件,好象叫Amixer
http://delphi.yesite.com

http://vcl.vclxx.com/delphi/d32free 中有 audio.zip!

关注！

时间太久，强制结束。 wjiachun