method App.OnStartup(e: StartupEventArgs);

var
  _ok : Boolean;

begin
  MyMutex := new Mutex(true,'MAA_QB_BILL_SCAN', out _ok);
  if _ok then
    begin
      AppDomain.CurrentDomain.UnhandledException += UnhandledException;
      ThemeManager.ApplicationThemeName := Theme.Office2016ColorfulName;

      inherited;
    end
  else
    Application.Current.Shutdown;
end;