100分求静音代码 要有注释的哦！刚学delphi请达人见量（在线等5：00结帐）

我做个简单的播放器   想实现静音功能   请大侠帮忙

• · 推荐参考文章：
• iSeries课程学习导航图，给您指引学习或者培训方向。
• Some info on AS/400 V5R3
• 【探讨】如何限制Notes用户邮箱大小？
• 【探讨】如何使用Notes与其它关系数据库进行信息交互？
• 磁带放进去就弹不出来三个指示灯一会全亮着
• hanyu看过来，24小时交易的AS/400如何备份？
• 原创：建立QINTER外可用于交互式访问的独立子系统
• V5R3 CL Programming
• 得到4位表示 年份 的新方法？
• 如何從 AS/400 啟動 PC 程序或 從 PC 啟動 AS/400 程序?

· 网友精彩回答：

http://dev.csdn.net/develop/article/17/17257.shtm  
  存成相应的pas文件  
  然后添加到你的程序里面project->add   to   project  
  在主窗体里面调用  
  button1.click  
      setvolumemute(master,true);  
  button2.click  
      setvolumemute(master,false);  
   
  应该没有办法再简单了吧