音量调节助手(转)

最新推荐文章于 2025-09-10 13:02:12 发布

weixin_34049032

最新推荐文章于 2025-09-10 13:02:12 发布

阅读量142

点赞数

文章标签：操作系统开发工具

源：音量调节助手

软件名称：音量调节助手软件功能：通过键盘快捷键快速调节系统主音量软件版本：V2014 软件作者：易几网络操作系统：所有WINDOWS版本开发工具：DELPHI XE 操作说明：软件运行后最小化到通知栏，完全通过键盘快捷键进行音量调节 Ctrl+F9 减小音量 Ctrl+F10 放大音量 Ctrl+F11 切换静音右键弹出选项菜单授权说明：永久免费，若觉得不错，可捐赠作者，支付宝18845116@QQ.COM 联系作者：邮箱18845116@QQ.COM 下载地址：http://pan.baidu.com/s/1pJpt4ld

调节音量代码

unit UnitVolumeWin7;

interface

uses messages, Windows, Forms;

/// <summary>
/// 增大音量
/// </summary>
procedure VolumeUp;
/// <summary>
/// 减小音量
/// </summary>
procedure VolumeDown;
/// <summary>
/// 切换静音
/// </summary>
procedure VolumeMute;

implementation

procedure VolumeUp;
begin
  SendMessage(Application.Handle, WM_APPCOMMAND, $30292, APPCOMMAND_VOLUME_UP * $10000);
end;

procedure VolumeDown;
begin
  SendMessage(Application.Handle, WM_APPCOMMAND, $30292, APPCOMMAND_VOLUME_DOWN * $10000);
end;

procedure VolumeMute;
begin
  SendMessage(Application.Handle, WM_APPCOMMAND, $200EB0, APPCOMMAND_VOLUME_MUTE * $10000);
end;

end.