📄 msgdatabaseaccuracerreg.pas
字号:
unit MsgDatabaseAccuracerReg;
{$I MsgVer.inc}
interface
// register MsgCommunicator Database Connection component in group MsgCommunicator
procedure Register;
implementation
uses Classes, TypInfo,
{$IFDEF MSWINDOWS}
Controls,
{$ENDIF}
{$IFDEF D6H}
DesignIntf
{$ELSE}
Dsgnintf
{$ENDIF}
// MsgCommunicator units
{$IFDEF DEBUG_LOG}
,MsgDebug
{$ENDIF}
, MsgDatabaseAccuracer
;
//------------------------------------------------------------------------------
// registration
//------------------------------------------------------------------------------
procedure Register;
begin
{$IFDEF DEBUG_LOG_INIT}
aaWriteToLog('MsgReg.Register started');
{$ENDIF}
RegisterComponents('MsgCommunicator', [TMsgDatabaseAccuracer]);
RegisterComponents('MsgCommunicator', [TMsgTempTableAccuracer]);
{$IFDEF DEBUG_LOG_INIT}
aaWriteToLog('MsgDatabaseAccuracerReg.Register finished');
{$ENDIF}
end; // Register
initialization
{$IFDEF DEBUG_LOG_INIT}
aaWriteToLog('MsgDatabaseAccuracerReg initialization');
{$ENDIF}
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -