program UrlMon;

uses
  Vcl.Forms,
  Tocsg.Win32,
  Tocsg.Safe,
  DUrlMonMain in 'DUrlMonMain.pas' {DlgUrlMonMain},
  CtrlWndActiveHook in '..\WndMsgHook\EXE_WndMsgHook\CtrlWndActiveHook.pas',
  ManagerUrlData in 'ManagerUrlData.pas',
  DNotice in '..\..\eCrmHE\EXE_eCrmHomeEdition\Messages\DNotice.pas' {DlgNotice},
  Define in 'Define.pas',
  GlobalDefine in '..\..\eCrmHE\LIB_Common\GlobalDefine.pas',
  NetFwTypeLib_TLB in '..\MgWinFW\NetFwTypeLib_TLB.pas',
  Tocsg.Firewall in '..\MgWinFW\Tocsg.Firewall.pas',
  ThdExtrUrl in 'ThdExtrUrl.pas',
  Condition in '..\..\eCrmHE\LIB_Common\Condition.pas';

{$R *.res}
var
  mtx: TTgMutex;
begin
  Guard(mtx, TTgMutex.Create('Global\25ksdkf'));
  if mtx.MutexState <> msCreateOk then
    exit;

  ReportMemoryLeaksOnShutdown := DebugHook <> 0;

  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TDlgUrlMonMain, DlgUrlMonMain);
  Application.Run;
end.