各位大虾帮帮忙

Question

在利用MediaPlayer播放文件时，如何调整声音的大小（在程序中实现），以及如何实现亮度、灰度的控制。各位大虾帮帮忙。

Answer 1

1、调整声音的大小
****************
左声道：
var
v,t：LOngint;
beging:
 t:=55-TrackBar1.Positinon;
 auxGetVolume(MediaPlayer.DeviceID-1,@v);
 v:=((t shl 8)or(v and $ffff0000));
 auxSetVolume(MediaPlayer.DeviceID-1,v);
end;
****************
右声道：
var
v,t：LOngint;
beging:
 t:=55-TrackBar2.Positinon;
 auxGetVolume(MediaPlayer.DeviceID-1,@v);
 v:=((t shl 24)or(v and $0000ffff));
 auxSetVolume(MediaPlayer.DeviceID-1,v);
end;注：TrackBar.max:=255;
MediaPlayer是SYSTEM页中的那个MediaPlayer；

Answer 2

多谢老兄:)那如何实现亮度和灰度的控制呢,多谢?
请问一下音量的值是不是先附给了,变量t,并且还要用到一个TrackBar控件
在界面中用这个控件来调整音量的大小??