Board logo

Subject: 终于完成TCnVolumeCtrl [Print This Page]

Author: kendling    Time: 2005-9-24 10:33     Subject: 终于完成TCnVolumeCtrl

CnPack.org的邮件系统是否出来问题了?怎么发不了呢?

  周兄,经过多天的调试终于完成TCnVolumeCtrl。
  由于原来的单元无法适应多设备的要求,的已经全部重新编写了。
  附件内包含Demo程序。

  现在提供以下功能:(由于时间关系,没写使用说明。其实也很简单)

    //获取参数
    function GetDevCaption(uDev: UINT): string;
    {* 获取设备名称}
    function GetDevLines(uDev: UINT): DWORD;
    {* 获取设备线路总数}
    function GetLineCaption(uDev, uLine: UINT): string;
    {* 获取线路名称}
    function GetLineChannels(uDev, uLine: UINT): DWORD;
    {* 获取线路通道总数}
    function GetLineHaveBalance(uDev, uLine: UINT): Boolean;
    {* 获取线路是否存在左右平行}
    function GetLineVolume(uDev, uLine: UINT): TCnVolume;
    {* 获取线路音量}
    function GetLineBalance(uDev, uLine: UINT): TCnBalance;
    {* 获取线路静音状态}
    function GetLineMute(uDev, uLine: UINT): Boolean;
    {* 获取线路静音状态}
    //设置参数
    function SetLineVolume(uDev, uLine: UINT; Volume: TCnVolume): Boolean;
    {* 获取线路音量}
    function SetLineBalance(uDev, uLine: UINT; iBalance: TCnBalance): Boolean;
    {* 获取线路左右平行}
    function SetLineMute(uDev, uLine: UINT; bMute: Boolean): Boolean;
    {* 获取线路通道总数}
    //属性
    property Devs: UINT read GetDevs;
    {* 获取设备总数}
    property CurDev: UINT read FDevice write SetDev;
    {* 设置/获取当前设备}
    property CurDevCaption: string read GetDevCap;
    {* 获取当前设备名称}
    property Lines: UINT read GetLines;
    {* 获取当前设备的线路总数}
    property CurLine: UINT read FLine write SetLine;
    {* 设置/获取当前线路}
    property CurLineCaption: string read GetLineCap;
    {* 获取当前线路名称}
    property CurLineChannels: DWORD read GetChannels;
    {* 获取当前线路通道总数}
    property Volume: TCnVolume read GetVolume write SetVolume;
    {* 设置/获取当前线路音量}
    property Balance: TCnBalance read GetBalance write SetBalance;
    {* 设置/获取当前线路左右平行}
    property IsMute: Boolean read GetIsMute write SetIsMute;
    {* 设置/获取当前线路静音状态}
    property OnVolumeChange: TCnMixVolumeEvent read FOnVolumeChange write FOnVolumeChange;
    property OnMuteChange: TCnMixMuteEvent read FOnMuteChange write FOnMuteChange;

Attachment: VolumeCtrl.rar (2005-9-24 10:33, 186.43 K) / Download count 535
http://bbs.cnpack.org/attachment.php?aid=135
Author: zjy    Time: 2005-9-24 18:30

信箱应该是好的,这两天都有收到邮件。你遇到的发信错误是怎样的?
最近比较忙,等下周有空时,我再来提交新的控件。
Author: kendling    Time: 2005-9-25 09:28     Subject: 错误信息

账号“kendling@21cn.com”发送邮件错误,错误代码:551;错误信息:551 <cnpack.org>, Domain not found.

Hi. This is the qmail-send program at redsaga.com.
I'm afraid I wasn't able to deliver your message to the following addresses.
This is a permanent error; I've given up. Sorry it didn't work out.

<cnpack.zjy@gmail.com>:
64.233.163.114 failed after I sent the message.
Remote host said: 552 5.7.0 Illegal Attachment 36si234719nzk
Author: zjy    Time: 2005-9-26 10:47

从错误信息看,是 gmail 信箱拒收了这个附件,有些奇怪

master 信箱是管理员公共信箱,会转发给每位管理员。由于垃圾邮件太多,我的信箱又转到 gmail 上帮我过滤,再转回 cnpack 上另一信箱收取。我刚才查了一下,转发到 gmail 之前是已经收到了的。

我简单看了下 Demo,做得很不错!
Author: illk    Time: 2005-10-16 14:09

能否把录音的控制一并做进去呢....
Author: kendling    Time: 2005-10-19 11:14

以后会增加的。
Author: Passion    Time: 2005-10-25 12:02

Gmail好像容易拒收rar的附件?
Author: 秋伊水    Time: 2005-12-26 22:54

不错,支持!
Author: 那一刀    Time: 2005-12-28 22:22

不错,支持!




Welcome to CnPack Forum (http://bbs.cnpack.org/) Powered by Discuz! 5.0.0