2018年11月5日

摘要: 那就到 windows \syswow64 下重新注册一下 mstscax.dll 就可以了 regsvr32 mstscax.dll 阅读全文
posted @ 2018-11-05 22:50 westsoft 阅读(242) 评论(0) 推荐(0)
 
摘要: unit UMute; interface uses MMSystem, Dialogs; Type TDeviceName = (Master, Microphone, WaveOut, Synth); function GetVolume(DN:TDeviceName) : Word ; procedure SetVolume(DN:TDeviceName; Value:Word); ... 阅读全文
posted @ 2018-11-05 12:57 westsoft 阅读(1223) 评论(0) 推荐(0)
 
摘要: unit ttSound; interface uses winapi.windows, winapi.Messages; type SimpleSoundControl = class class procedure Mute(); static; class procedure VolumeUp(); static; class procedure VolumeDown(); stat... 阅读全文
posted @ 2018-11-05 12:56 westsoft 阅读(546) 评论(0) 推荐(0)