用你的BINAPI。U32函数控制音量，没人比你更熟悉这个了吧？？呵呵，进入正题！


做了一个程序按钮，其下挂的计算图标内容如下：
-------------------------------------------------------------------------------------------------
--功能：音量加大
--程序先增加WAV音量，WAV音量达到100后（不能再加），就增加主音量
--当主音量达到100后（不能再加），不再做增音量的操作。
--并使“TV_音量加”按钮失效（BTN_VOL_ADD=FALSE）。

--变量说明：DELTA_VOL变量是增加音量的“步长”，按一下音量就增加DELTA_VOL


其余变量在程序中给了说明，应不难理解。
-----------------------------------------------------
TV_VOL_W:=BNA_GetVolume(1)--读取WAV音量
TV_VOL_M:=BNA_GetVolume(0)--读取主音量

if TV_VOL_W<100 then

if TV_VOL_W+DELTA_VOL<=100 then
TV_VOL_W:=TV_VOL_W+DELTA_VOL
BNA_SetVolume(1, TV_VOL_W)--WAV音量增加

else
TV_VOL_W:=100
BNA_SetVolume(1, TV_VOL_W)--WAV音量为100
end if

end if
----------------------------------------------------------------------------------------
if TV_VOL_W=100 then

if TV_VOL_M+DELTA_VOL<=100 then
TV_VOL_M:= TV_VOL_M+DELTA_VOL
BNA_SetVolume(0, TV_VOL_M)--主音量增加

else
TV_VOL_M:=100
BNA_SetVolume(0, TV_VOL_M)--主音量为100
BTN_TV_VOL_ADD:=FALSE--使“TV_音量加”按钮失效（BTN_VOL_ADD=FALSE）
end if

end if
-------------------------------------------------------------------

似乎没有什么问题，不过你的程序逻辑和分支写的感觉不太舒服
我自己都很久不搞AW了，那个ucd我一时也找不到，有时间的时候试试吧。

"if TV_VOL_W=100 then"这句的条件TV_VOL_W=100难道被AW认为是赋值语句？所以一直认为是TRUE？？不可能啊！真是无法解释了。。。

我以前总是用QTXtra播放声音，兼控制音量和声音数量，不用API编程。

我的代码,我觉得这样感觉更好些,运行时没有问题.
===================================
DELTA_VOL=10
...
===================================
TV_VOL_W:=BNA_GetVolume(1)--读取WAV音量
TV_VOL_M:=BNA_GetVolume(0)--读取主音量

if TV_VOL_W< 100 then
TV_VOL_W=TV_VOL_W+DELTA_VOL
if TV_VOL_W>100 then
TV_VOL_W=100
end if
BNA_SetVolume(1, TV_VOL_W)--WAV音量增加
else
if TV_VOL_M<100 then
TV_VOL_M=TV_VOL_M+DELTA_VOL
if TV_VOL_M>100 then
TV_VOL_M=100
end if
end if
BNA_SetVolume(0, TV_VOL_M)--主音量增加
end if

确实你的更简洁，长久没编程序居然思维如此不清晰，可悲。

Rock在上个帖子中说

引用:

---

aw的东西不能算编程

---

我说了我在用AW编程了吗？我只是说我好长时间没编程序，这种IF语句居然写不好了。

干吗这么叫真呀。ROCK老大？

AW的东西怎么不能叫编程？
程序代码可以写地到处都是。加了JS后，编程手段更多了，起码按位与、或没什么问题了。