{******************************************************************************} { CnPack For Delphi/C++Builder } { 中国人自己的开放源码第三方开发包 } { (C)Copyright 2001-2016 CnPack 开发组 } { ------------------------------------ } { } { 本开发包是开源的自由软件,您可以遵照 CnPack 的发布协议来修 } { 改和重新发布这一程序。 } { } { 发布这一开发包的目的是希望它有用,但没有任何担保。甚至没有 } { 适合特定目的而隐含的担保。更详细的情况请参阅 CnPack 发布协议。 } { } { 您应该已经和开发包一起收到一份 CnPack 发布协议的副本。如果 } { 还没有,可访问我们的网站: } { } { 网站地址:http://www.cnpack.org } { 电子邮件:master@cnpack.org } { } {******************************************************************************} unit CnNetRegister; {* |
================================================================================
* 软件名称:网络通讯组件包
* 单元名称:网络通讯组件包注册单元
* 单元作者:CnPack开发组
* 备    注:
* 开发平台:PWin98SE + Delphi 5.0
* 兼容测试:PWin9X/2000/XP + Delphi 5/6
* 本 地 化:该单元中的字符串均符合本地化处理方式
* 单元标识:$Id$
* 修改记录:2002.04.18 V1.1
*                为TCnRS232Dialog增加两个属性编辑器声明
*           2002.04.08 V1.0
*                创建单元
================================================================================
|
} interface {$I CnPack.inc} uses Windows, Messages, SysUtils, Classes, Graphics, {$IFDEF COMPILER6_UP} DesignIntf, DesignEditors, {$ELSE} DsgnIntf, {$ENDIF} {$IFNDEF BCB5} {$IFNDEF BCB6} CnUDP, {$ENDIF} {$ENDIF} CnConsts, CnRS232, CnModem, CnRS232Dialog, CnIP, CnPing, CnDialUp, CnCameraEye, CnIISCtrl, CnTwain, CnIocpSimpleMemPool, CnIocpSocketAdapter, CnNetPropEditor; procedure Register; {* 控件、组件编辑器、属性编辑器注册过程} implementation procedure Register; begin RegisterComponents(SCnNetPalette, [TCnRS232]); RegisterComponents(SCnNetPalette, [TCnModem]); RegisterComponents(SCnNetPalette, [TCnRS232Dialog]); RegisterComponents(SCnNetPalette, [TCnDialUp]); RegisterComponents(SCnNetPalette, [TCnIP, TCnPing]); RegisterComponents(SCnNetPalette, [TCnCameraEye, TCnIISCtrl, TCnTwain]); RegisterComponents(SCnNetPalette, [TCnIocpSimpleMemPool, TCnIocpSocketAdapter]); {$IFNDEF BCB5} {$IFNDEF BCB6} RegisterComponents(SCnNetPalette, [TCnUDP]); {$ENDIF} {$ENDIF} RegisterPropertyEditor(TypeInfo(TCnRS232Config), TCnRS232, '', TCnRS232ConfigProperty); RegisterPropertyEditor(TypeInfo(TCnRS232Timeouts), TCnRS232, '', TCnRS232TimeoutsProperty); RegisterPropertyEditor(TypeInfo(TCnRS232Config), TCnRS232Dialog, '', TCnRS232ConfigProperty); RegisterPropertyEditor(TypeInfo(TCnRS232Timeouts), TCnRS232Dialog, '', TCnRS232TimeoutsProperty); end; end.