program X2UtilsTest;

uses
  madExcept,
  madLinkDisAsm,
  Forms,
  X2UtOS in '..\X2UtOS.pas',
  X2UtApp in '..\X2UtApp.pas',
  X2UtHandCursor in '..\X2UtHandCursor.pas',
  X2UtSingleInstance in '..\X2UtSingleInstance.pas',
  FMain in 'Forms\FMain.pas' {frmMain};

{$R *.res}

const
  CAppID  = '{DCAC19C4-1D7D-47C0-AD4E-2A1DA39824E0}';

var
  frmMain:    TfrmMain;

begin
  if not SingleInstance(CAppID) then
    exit;

  Application.Initialize;
  Application.CreateForm(TfrmMain, frmMain);
  Application.Run;
end.