📄 aproreg.pas
字号:
{*********************************************************}
{* APROREG.PAS 4.04 *}
{* Copyright (C) TurboPower Software 1996-2002 *}
{* All rights reserved. *}
{*********************************************************}
{Global defines potentially affecting this unit}
{$I AWDEFINE.INC}
{Options required for this unit}
{$G+,X+,F+}
unit APROReg;
interface
uses
{$IFDEF Delphi6}
DesignIntf,
DesignEditors;
{$ELSE}
DsgnIntf;
{$ENDIF}
{ Constant declarations for IDE palette tab names }
const
APROTabName = 'APRO';
APROFaxTabName = 'APRO Fax';
APROTelephonyTabName = 'APRO Telephony';
{$IFDEF InstallNewStateComponents}
APROStateTabName = 'APRO State Machine'; {!!.04}
{$ENDIF}
procedure Register;
implementation
{$R APROREG.DCR}
uses
{ RTL/VCL Units }
Classes, SysUtils, Windows,
{ Standard Units }
AdPort, {TApdComPort}
AdProtcl, {TApdProtocol}
AdPStat, {TApdProtocolStatus}
AdStatLt, {TApdSLController, TApdStatusLight}
AdWnPort, {TApdWinsockPort}
AdSelCom, {port selection dialog}
AdPacket, {TApdDataPacket}
AdPropEd, {design-time property editors}
AdPager, {TApdTapPager, TApdSNPPPager, TApdSMSPager}
{$IFDEF InstallNewPager}
AdPgr, {!!.04}
{$ENDIF}
AdGSM, {TApdGSMPhone}
AdFtp, {TApdFTPClient}
AdScript, {TApdScript}
AdTrmEmu, {TAdVT100Emulator, TAdTTYEmulator}
AdRas, {TApdRasDialer}
AdRStat, {TApdRasStatus}
AdMdm, {TAdModem}
{State Machine Units}
AdStMach, {TApdStateMachine, TApdState}
{$IFDEF InstallNewStateComponents}
AdStDS, {Additional data sources} {!!.04}
AdStSt, {Additional States} {!!.04}
AdStProt, {Protocol States} {!!.04}
AdStFax, {Fax States} {!!.04}
AdStSapi, {SAPI States} {!!.04}
{$ENDIF}
{ Fax Units }
AdFaxCvt, {TApdFaxConverter, TApdFaxUnpacker}
AdFView, {TApdFaxViewer}
AdFax, {TApdSendFax, TApdReceiveFax}
AdFStat, {TApdFaxStatus}
AdFaxPrn, {TApdFaxPrinter}
AdFPStat, {TApdFaxPrinterStatus}
AdFaxCtl, {TApdFaxDriverInterface}
AdFaxSrv, {TApdFaxServer, TApdFaxServerManager, TApdFaxClient}
{ Telephony Units }
AdTapi, {TApdTapiDevice}
AdTStat, {TApdTapiStatus}
AdPEditT, {select device dialog}
AdSapiEn, {TApdSapiEngine}
AdSapiPh, {TApdSapiPhone}
AdVoIP; {IP Telephony components}
procedure Register;
begin
{ Register standard components }
RegisterComponents(APROTabName,
[TApdComPort,
TApdWinsockPort,
TApdRasDialer,
TApdRasStatus,
TApdFtpClient,
TApdFtpLog,
TApdDataPacket,
TApdScript,
{$IFNDEF InstallNewStateComponents}
TApdStateMachine,
TApdState,
{$ENDIF}
TAdModem,
TAdModemStatus,
TApdSLController,
TApdStatusLight,
TApdProtocol,
TApdProtocolLog,
TApdProtocolStatus,
{$IFDEF InstallNewPager}
TApdPager,
{$ENDIF}
TApdTAPPager,
TApdSNPPPager,
TApdGSMPhone,
TApdPagerLog,
TAdTerminal,
TAdTTYEmulator,
TAdVT100Emulator]);
{ Register Telephony components }
RegisterComponents(APROTelephonyTabName,
[TApdTapiDevice,
TApdTapiStatus,
TApdTapiLog,
TApdSapiEngine,
TApdSapiPhone,
TApdVoIP]);
{ Register Fax Components }
RegisterComponents(APROFaxTabName,
[TApdFaxConverter,
TApdFaxUnpacker,
TApdFaxViewer,
TApdReceiveFax,
TApdSendFax,
TApdFaxStatus,
TApdFaxLog,
TApdFaxPrinter,
TApdFaxPrinterStatus,
TApdFaxPrinterLog,
TApdFaxDriverInterface,
TApdFaxServer,
TApdFaxServerManager,
TApdFaxClient]);
{ Register State Machine Components } {!!.04}
{$IFDEF InstallNewStateComponents} {!!.04}
RegisterComponents (APROStateTabName, {!!.04}
[TApdStateMachine, {!!.04}
TApdStateComPortSource, {!!.04}
TApdStateGenericSource, {!!.04}
TApdState, {!!.04}
TApdActionState, {!!.04}
TApdSendFileState, {!!.04}
TApdReceiveFileState, {!!.04}
TApdSendFaxState, {!!.04}
TApdReceiveFaxState, {!!.04}
TApdSapiSpeakState]); {!!.04}
{$ENDIF} {!!.04}
end;
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -