热键控制系统音量

以下代码由PHP站长网 52php.cn收集自互联网

现在PHP站长网小编把它分享给大家，仅供参考

#!/usr/bin/env ruby
# -*- coding: gb18030 -*-
# __FILE__ : ctrlvol.rb
# 2012-7
# ruby 1.9.3

#参考 http://blog.163.com/fengchaotian_007/blog/static/66572109201152263615209/
#

require 'rubygems'
require 'windows/window'
include Windows::Window
require 'windows/window/message.rb'
include Windows::Window::Message

$: << '.'
require 'hotkey.rb'

class VolSet
	WM_APPCOMMAND = 0x319;
	APPCOMMAND_VOLUME_UP = 0x0a;
	APPCOMMAND_VOLUME_DOWN = 0x09;
	APPCOMMAND_VOLUME_MUTE = 0x08;

	def hwnd
		GetForegroundWindow()
	end
	def up
		SendMessage(hwnd,WM_APPCOMMAND,0x30292,APPCOMMAND_VOLUME_UP * 0x10000);
	end
	def down
		SendMessage(hwnd,APPCOMMAND_VOLUME_DOWN * 0x10000);
	end
	def mute
		SendMessage(hwnd,0x200eb0,APPCOMMAND_VOLUME_MUTE * 0x10000);
	end
end

if $0 == __FILE__
	V=VolSet.new
	32.times {V.down;sleep 0.01 }
	32.times {V.up;sleep 0.01 }
	2.times {V.mute;sleep 0.5 }
end

以上内容由PHP站长网【52php.cn】收集整理供大家参考研究

如果以上内容对您有帮助，欢迎收藏、点赞、推荐、分享。

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!