绿色风's Blog
简易工作室|专注AutoIT(Au3)
  • 首页
  • 流●年
  • 笔●记
    • 学习随记
    • 源码示例
  • 脚●本
    • UDF(收集)
    • 工作室UDF
    • 工具●教程
    • 教程之GDI
  • 微●语
  • 作●品
  • 下●载
  • 关于我
8月302018

AU3控制当前程序的音量

作者:绿色风   发布:2018-8-30 14:38 Thursday   分类:源码示例   阅读:1132次   评论:0条  
#NoTrayIcon
#RequireAdmin
#pre_usex64=n
#QQ交流群:477266297
#include 
Opt('MustDeclareVars', 1)

Global $MainForm = GUICreate('SoundValueTest', 400, 200, -1, -1)
Global $Sli_SoundValue = GUICtrlCreateSlider(10, 112, 380, 20)
GUICtrlSetLimit($Sli_SoundValue, 100, 0)
GUICtrlSetData($Sli_SoundValue, waveOutGetVolume())
Global $Lbl_CurrentSound = GUICtrlCreateLabel("当前程序音量:", 10, 16, 100, 41)
Global $Lbl_CurrentSoundValue = GUICtrlCreateLabel(waveOutGetVolume(), 110, 16, 164, 41)
GUICtrlSetColor($Lbl_CurrentSoundValue, 0xff0000)
GUISetState()
Local $nMsg
While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Sli_SoundValue
                        waveOutSetVolume(0, GUICtrlRead($Sli_SoundValue))
                        GUICtrlSetData($Lbl_CurrentSoundValue, waveOutGetVolume())
        EndSwitch
WEnd

;~ 第二个参数的低字节是左声道音量,高字节是右声道音量

Func waveOutGetVolume($hHwd = 0)
        Local $WaveVol = -1
        Local $tBuffer = DllStructCreate("dword")
        If @error Then Return SetError(2, 0, -2)
        Local $ret = DllCall("winmm.dll", "long", "waveOutGetVolume", "long", $hHwd, "long", DllStructGetPtr($tBuffer))
        If @error Then Return SetError($ret[0], 0, $WaveVol)
        $WaveVol = Round(100 * DllStructGetData($tBuffer, 1) / 0xFFFF)
        Return SetError($ret[0], 0, $WaveVol)
EndFunc   ;==>waveOutGetVolume

Func waveOutSetVolume($hHwd = 0, $Round = 100)
        Local $iSoundValue = Round(0xFFFF * $Round / 100)
        Local $ret = DllCall('winmm.dll', 'none', 'waveOutSetVolume', 'hwnd', $hHwd, 'dword', $iSoundValue)
        Return $ret[0] = ''
EndFunc   ;==>waveOutSetVolume



本文固定链接: http://www.jianyiit.com/post-295.html

blogger
该日志由 绿色风 于2018-8-30 14:38 Thursday发表在 源码示例 分类下。
版权所有:《绿色风's Blog》 → 《AU3控制当前程序的音量》;
除特别标注,本博客所有文章均为原创. 互联分享,尊重版权,转载请以链接形式标明本文地址;
本文标签: AU3 小技巧
et_highlighter51
上一篇::检测当前网页,并加载返回JQuery
下一篇:Windows常用shell命令大全[自带程序的名称]

热门文章

  • 显示器亮度,对比度,色温缩放调节,笔记本亮度调节
  • 显示器 EDID 读取,生产日期和分辨率
  • 字符串打乱顺序
  • 简单的文本替换伪原则工具
  • Au3中仿高阶函数的使用示例

相关文章

  • 显示器 EDID 读取,生产日期和分辨率
  • Au3简单的多线程例子
  • au3 gdi旋转的文本-转自德语论坛
  • 图片分割器
  • 旋转动画AU3
取消回复

发表评论

亲,头像对么?

76 + 51 =

提交中,请稍候……


木有头像就木JJ啦!还木有头像吗?点这里申请属于你的个性Gravatar头像吧!


    站点统计
    • 日志总数: 302 篇
    • 评论数量: 92 条
    • 微语数量: 40 条
    • 附件总量: 305 件
  • 打赏"绿色风"



      扫码关注本站公众号 可搜本站内容

  • Autoit V3 脚本交流群

      常驻群1:477266297
      常驻群2:40672266


  • 标签

      QQ UDF IP 吐嘈 AU3 Enum 枚举常量 AU3小技巧 数组 进度条 对象 删除重复行 趣图 Hex 获取网络时间 swf UTC 日期 时间 POST 三目运算 三元判断 小技巧 GDI 收款 SQL 工具 映像 MV 劫持 API 教程 CHM 按键 GDI教程 杯举 按时间 笑一笑 2014 网络用语 2015 免费 元宵 视图 listview au3示例 美女 壁纸 游戏 差异加密 加密 串口 WebAPI IE TTS 环境yo 过去 验证码 图片分割 VBS HiFi Mp3 免费空间 QQchat 机器人 win10 电影 彩票 入门教程 帮助文档 事件 编码 CMD MD5 打赏 翻译 作品 下载 多线程 ListViewRead 赞助 鼠标 窗口尺寸 分享 汇编注入 干货 复制 移动 gizp 乐一乐 正则 autoit wav波形文件 播放 authcode 鼠标HOOK 键盘HOOK 剪切板 复制图片 文件遍历 JDK 网卡 GetAdaptersInfo 内存 CPU 转码
  • 链接

    • AU3中文论坛
    • 易捷博客
    • 简爱博客
    • 胡言乱语-小胡老师
    • 又淘气.我的世界
    • 御坂网络
    • 大师兄U盘装系统
    • 顺网小哥'S Blog
    • 猛牛哥的博客
    • 墨涩颓废网
  • 存档

    • 2019年9月(1)
    • 2019年8月(1)
    • 2019年5月(2)
    • 2019年4月(2)
    • 2019年3月(3)
    • 2019年2月(1)
    • 2018年11月(1)
    • 2018年10月(1)
    • 2018年9月(3)
    • 2018年8月(4)
    • 2018年4月(2)
    • 2018年3月(1)
    • 2018年1月(6)
    • 2017年12月(1)
    • 2017年11月(8)
    • 2017年7月(2)
    • 2017年6月(1)
    • 2017年5月(2)
    • 2017年4月(8)
    • 2017年3月(2)
    • 2017年2月(3)
    • 2017年1月(3)
    • 2016年12月(5)
    • 2016年11月(1)
    • 2016年10月(1)
    • 2016年9月(2)
    • 2016年8月(2)
    • 2016年7月(4)
    • 2016年6月(3)
    • 2016年5月(2)
    • 2016年4月(3)
    • 2016年3月(58)
    • 2016年1月(6)
    • 2015年12月(7)
    • 2015年11月(3)
    • 2015年10月(10)
    • 2015年9月(9)
    • 2015年8月(11)
    • 2015年7月(11)
    • 2015年6月(1)
    • 2015年5月(6)
    • 2015年4月(14)
    • 2015年3月(9)
    • 2015年2月(6)
    • 2015年1月(12)
    • 2014年12月(19)
    • 2014年11月(18)
    • 2014年10月(12)
Copyright © 2013 绿色风's Blog. Powered by emlog. Theme by 射雕天龙. 鄂ICP备15002104号-1 sitemap