program eCrmHeHelper;

uses
  Tocsg.Safe in '..\..\Tocsg.Lib\VCL\Tocsg.Safe.pas',
  Tocsg.Trace in '..\..\Tocsg.Lib\VCL\Tocsg.Trace.pas',
  Tocsg.Path in '..\..\Tocsg.Lib\VCL\Tocsg.Path.pas',
  Tocsg.Files in '..\..\Tocsg.Lib\VCL\Tocsg.Files.pas',
  Tocsg.Obj in '..\..\Tocsg.Lib\VCL\Tocsg.Obj.pas',
  Tocsg.Encrypt in '..\..\Tocsg.Lib\VCL\Tocsg.Encrypt.pas',
  Tocsg.Exception in '..\..\Tocsg.Lib\VCL\Tocsg.Exception.pas',
  Tocsg.Binary in '..\..\Tocsg.Lib\VCL\Tocsg.Binary.pas',
  Tocsg.Hash in '..\..\Tocsg.Lib\VCL\Tocsg.Hash.pas',
  Tocsg.Thread in '..\..\Tocsg.Lib\VCL\Tocsg.Thread.pas',
  Tocsg.Json in '..\..\Tocsg.Lib\VCL\Tocsg.Json.pas',
  Tocsg.DateTime in '..\..\Tocsg.Lib\VCL\Tocsg.DateTime.pas',
  Tocsg.Strings in '..\..\Tocsg.Lib\VCL\Tocsg.Strings.pas',
  Tocsg.Hex in '..\..\Tocsg.Lib\VCL\Tocsg.Hex.pas',
  Tocsg.Param in '..\..\Tocsg.Lib\VCL\Tocsg.Param.pas',
  Tocsg.Process in '..\..\Tocsg.Lib\VCL\Tocsg.Process.pas',
  Tocsg.FileInfo in '..\..\Tocsg.Lib\VCL\Tocsg.FileInfo.pas',
  Tocsg.Kernel32 in '..\..\Tocsg.Lib\VCL\Tocsg.Kernel32.pas',
  Tocsg.WndUtil in '..\..\Tocsg.Lib\VCL\Tocsg.WndUtil.pas',
  Tocsg.WinInfo in '..\..\Tocsg.Lib\VCL\Tocsg.WinInfo.pas',
  Tocsg.Registry in '..\..\Tocsg.Lib\VCL\Tocsg.Registry.pas',
  Tocsg.Shell in '..\..\Tocsg.Lib\VCL\Tocsg.Shell.pas',
  Tocsg.Win32 in '..\..\Tocsg.Lib\VCL\Tocsg.Win32.pas',
  Tocsg.WTS in '..\..\Tocsg.Lib\VCL\Tocsg.WTS.pas',
  Tocsg.Graphic in '..\..\Tocsg.Lib\VCL\Tocsg.Graphic.pas',
  Tocsg.Clipboard in '..\..\Tocsg.Lib\VCL\Tocsg.Clipboard.pas',
  Tocsg.Convert in '..\..\Tocsg.Lib\VCL\Tocsg.Convert.pas',
  Tocsg.VTUtil in '..\..\Tocsg.Lib\VCL\Tocsg.VTUtil.pas',
  Tocsg.User32 in '..\..\Tocsg.Lib\VCL\Tocsg.User32.pas',
  Tocsg.Network in '..\..\Tocsg.Lib\VCL\Tocsg.Network.pas',
  Tocsg.Driver in '..\..\Tocsg.Lib\VCL\Tocsg.Driver.pas',
  Tocsg.Disk in '..\..\Tocsg.Lib\VCL\Tocsg.Disk.pas',
  Tocsg.WMI in '..\..\Tocsg.Lib\VCL\Tocsg.WMI.pas',
  Tocsg.Service in '..\..\Tocsg.Lib\VCL\Tocsg.Service.pas',
  Tocsg.Printer in '..\..\Tocsg.Lib\VCL\Tocsg.Printer.pas',

  superobject in '..\..\Tocsg.Lib\VCL\SuperObject\superobject.pas',
  aes_type in '..\..\Tocsg.Lib\VCL\EncLib\AES\aes_type.pas',
  aes_cbc in '..\..\Tocsg.Lib\VCL\EncLib\AES\aes_cbc.pas',
  BTypes in '..\..\Tocsg.Lib\VCL\EncLib\AES\BTypes.pas',
  AES_Base in '..\..\Tocsg.Lib\VCL\EncLib\AES\AES_Base.pas',
  AES_Encr in '..\..\Tocsg.Lib\VCL\EncLib\AES\AES_Encr.pas',
  AES_Decr in '..\..\Tocsg.Lib\VCL\EncLib\AES\AES_Decr.pas',
  EM.MD5 in '..\..\Tocsg.Lib\VCL\EncLib\EM.MD5.pas',
  EM.CRC32 in '..\..\Tocsg.Lib\VCL\EncLib\EM.CRC32.pas',
  EM.Tocsg.sha256 in '..\..\Tocsg.Lib\VCL\EncLib\EM.Tocsg.sha256.pas',
  EM.Tocsg.Sha1 in '..\..\Tocsg.Lib\VCL\EncLib\EM.Tocsg.Sha1.pas',
  EM.Tocsg.hash in '..\..\Tocsg.Lib\VCL\EncLib\EM.Tocsg.hash.pas',
  EM.WtsApi32 in '..\..\Tocsg.Lib\VCL\EncLib\EM.WtsApi32.pas',
  EM.winioctl in '..\..\Tocsg.Lib\VCL\Other\EM.winioctl.pas',
  EM.GSStorage in '..\..\Tocsg.Lib\VCL\Other\EM.GSStorage.pas',
  EM.WinOSVersion in '..\..\Tocsg.Lib\VCL\Other\EM.WinOSVersion.pas',
  EM.nduWlanAPI in '..\..\Tocsg.Lib\VCL\Other\EM.nduWlanAPI.pas',
  EM.nduCType in '..\..\Tocsg.Lib\VCL\Other\EM.nduCType.pas',
  EM.nduL2cmn in '..\..\Tocsg.Lib\VCL\Other\EM.nduL2cmn.pas',
  EM.nduWlanTypes in '..\..\Tocsg.Lib\VCL\Other\EM.nduWlanTypes.pas',
  EM.nduWinDot11 in '..\..\Tocsg.Lib\VCL\Other\EM.nduWinDot11.pas',
  EM.nduWinNT in '..\..\Tocsg.Lib\VCL\Other\EM.nduWinNT.pas',
  EM.nduEapTypes in '..\..\Tocsg.Lib\VCL\Other\EM.nduEapTypes.pas',
  EM.nduNtDDNdis in '..\..\Tocsg.Lib\VCL\Other\EM.nduNtDDNdis.pas',

  EM.WbemScripting_TLB in '..\..\Tocsg.Lib\VCL\Other\EM.WbemScripting_TLB.pas',

  Forms,
  DefineHelper in 'DefineHelper.pas',
  ProcessParam in 'ProcessParam.pas',
  DHeHelperMain in 'DHeHelperMain.pas' {DlgHeHelperMain},
  GlobalOutAddInDefine in '..\DLL_BS1OutlookAddIn\GlobalOutAddInDefine.pas',
  DLicense in 'Messages\DLicense.pas' {DlgLicense},
  GlobalDefine in '..\LIB_Common\GlobalDefine.pas',
  Condition in '..\LIB_Common\Condition.pas',
  DQnA in '..\EXE_eCrmHomeEdition\Messages\DQnA.pas' {DlgQnA},
  Define in 'Define.pas',
  DAfterReport in '..\EXE_eCrmHomeEdition\Messages\DAfterReport.pas' {DlgAfterReport},
  DUserInfoAgree in 'Messages\DUserInfoAgree.pas' {DlgUserInfoAgree},
  CrmUtil in '..\LIB_Common\CrmUtil.pas',
  DReqDevExcept in '..\EXE_eCrmHomeEdition\Messages\DReqDevExcept.pas' {DlgReqDevExcept},
  CttSchDefine in '..\..\Tocsg.Module\ContentSearch\LIB_Common\CttSchDefine.pas',
  DDecryptDrm in '..\EXE_eCrmHomeEdition\DRM\DDecryptDrm.pas' {DlgDecryptDrm},
  Tocsg.DRM.Encrypt in '..\..\Tocsg.Module\TocsgDRM\LIB_Common\Tocsg.DRM.Encrypt.pas',
  DEncryptDrm in '..\EXE_eCrmHomeEdition\DRM\DEncryptDrm.pas' {DlgEncryptDrm};

{$R *.res}

var
  param: TProcessParam;
  trace: TTgTrace;
begin
  Guard(param, TProcessParam.Create);
{$IFDEF DEBUG}
  Guard(trace, TTgTrace.Create('C:\taskToCSG\eCrmHE\OUT_Debug - Win32\', 'Hlp.log'));
{$ENDIF}
  if not param.IsParamOK then
    exit;

  if (param.Role = 0) or (param.OwnerMtx = '') then
    exit;

  Application.Initialize;
  Application.MainFormOnTaskbar := true;
  Application.ShowMainForm := false;
  Application.CreateForm(TDlgHeHelperMain, DlgHeHelperMain);
  Application.Run;
end.