//--------------------------------------------------------------------------- #include "pch.h" #pragma hdrstop #include "ace/ace.h" #include "tao/corba.h" #include "ChatClientWnd.h" USEFORM("ChatClientWnd.cpp", ChatClientWindow); //--------------------------------------------------------------------------- #pragma package(smart_init) void ace_init() { ACE::init(); } #pragma startup ace_init void ace_fini() { ACE::fini(); } #pragma exit ace_fini //--------------------------------------------------------------------------- WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize (); Application->Title = "CORBA Chat Client"; Application->CreateForm(__classid(TChatClientWindow), &ChatClientWindow); Application->Run (); } catch (Exception &exception) { Application->ShowException (&exception); } catch (const CORBA::Exception &exception) { ShowMessage (String ("CORBA exception: ") + exception._rep_id ()); } catch (...) { ShowMessage ("Unknown exception"); } return 0; } //---------------------------------------------------------------------------