音量控制,源码是多媒体支持库的应用教程。
.版本 2
.支持库 eMMedia
.程序集 窗口程序集1
.程序集变量 左音量, 整数型
.程序集变量 右音量, 整数型
.子程序 __启动窗口_创建完毕
系统主音量.打开 (4)
系统主音量.取音量 (左音量, 右音量)
音量调节滑块条.位置 = 左音量 ÷ 655.34
音量大小标示.标题 = 到文本 (音量调节滑块条.位置)
静音选择框.选中 = 系统主音量.取静音 ()
.子程序 _静音选择框_被单击
系统主音量.置静音 (静音选择框.选中)
.子程序 _音量调节滑块条_位置被改变
系统主音量.置音量 (音量调节滑块条.位置 × 655.34, 音量调节滑块条.位置 × 655.34)
音量大小标示.标题 = 到文本 (音量调节滑块条.位置)
.子程序 _系统主音量_音量改变
系统主音量.取音量 (左音量, 右音量)
音量调节滑块条.位置 = 左音量 ÷ 655.34
音量大小标示.标题 = 到文本 (音量调节滑块条.位置)
.子程序 _系统主音量_静音改变
静音选择框.选中 = 系统主音量.取静音 ()
奇葩的音量条比赛源码