么样能控制系统的“主音量”（双击音量图标，排在最前面的那个，volume ）？(10分)

B

bill_max

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-21

• #1

怎么样能控制系统的“主音量”（双击音量图标，排在最前面的那个，volume ）？
搜索到的以前的帖子中介绍的那几个函数（waveOutSetVolume，waveOutGetErrorTextA，midiOutSetVolume，
midiOutGetErrorTextA，auxSetVolume，auxGetErrorTextA），好像控制的并不是我所想要的volume.
分不多，请见谅：（

 

F

fyj0466

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-23

• #2

先引用mmsystem单元，然后
procedure TForm1.TrackBar1Change(Sender: TObject);

var Wave:string;

begin


Wave:='$'+inttohex(TrackBar1.Position

4)+inttohex(TrackBar2.Position

4);

waveoutsetvolume(0

strtoint(Wave));

end;

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-23

• #3

Amixer控件

 

B

bill_max

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-09

• #4

接受答案了.