www.pudn.com > CommSettings.rar > TestSettings.cpp


//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("UnitMain.cpp", Form1);
USEFORM("UnitCommSet.cpp", FormCommSettings);
USEFORM("UnitAbout.cpp", FormAbout);
USEFORM("UnitOptions.cpp", FormOptions);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->CreateForm(__classid(TForm1), &amt;Form1);
Application->Run();
}
catch (Exception &amt;exception)
{
Application->ShowException(&amt;exception);
}
catch (...)
{
try
{
throw Exception("");
}
catch (Exception &amt;exception)
{
Application->ShowException(&amt;exception);
}
}
return 0;
}
//---------------------------------------------------------------------------