GASPilot_Main.cpp

Go to the documentation of this file.

//---------------------------------------------------------------------------
/// \file GASPilot_Main.cpp
/// \brief Windows MAIN for GASPilot
/// \ingroup CAT
/// 
/// Copyright (c) 2003-2008 by Michael Ellison.
/// See COPYING.txt for the \ref gaslicense License (MIT License).
///
// $Author: mikeellison $
// $Date: 2008-01-21 08:33:12 -0600 (Mon, 21 Jan 2008) $
// $Revision:   $
// $NoKeywords: $
//---------------------------------------------------------------------------

#include "CATString.h"
#include "GASPilot.h"

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
{
   if (FAILED(::CoInitialize(0)))
   {
      ::MessageBox(NULL,L"Could not initialize COM.\n",L"GASPilot",MB_OK);
      return -1;
   }

   CATResult result = CAT_SUCCESS;
   try
   {
      gApp = new GASPilot(hInstance, CAT_GUI,L"GASPilot");
   }
   catch(...)
   {
      gApp = 0;
   }

   if (gApp == 0)
   {
      ::MessageBox(NULL,L"Could not create app object. Terminating.",L"SkeletonApp",MB_OK);
      ::CoUninitialize();
      return -1;
   }
   
   if (CATFAILED(result))
   {
      gApp->DisplayError(result);
      ::CoUninitialize();
      return result;
   }

   result = gApp->Run();
   
   if (CATFAILED(result))
   {
      gApp->DisplayError(result);
   }
   
   delete gApp;
   gApp = 0;

   ::CoUninitialize();
   return result;
}

---