//--------------------------------------------------------------------------- #include #pragma hdrstop USERES("install.res"); USEFORM("main.cpp", mainF); USEFORM("setup.cpp", setupF); //--------------------------------------------------------------------------- WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize(); Application->CreateForm(__classid(TmainF), &mainF); Application->CreateForm(__classid(TsetupF), &setupF); Application->Run(); } catch (Exception &exception) { Application->ShowException(&exception); } return 0; } //---------------------------------------------------------------------------