//--------------------------------------------------------------------------- #include #pragma hdrstop //--------------------------------------------------------------------------- USEFORM("Pareto1.cpp", frmPareto); USERES("Pareto.res"); //--------------------------------------------------------------------------- WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize(); Application->Title = ""; Application->HelpFile = "OLCH-DMO.HLP"; Application->CreateForm(__classid(TfrmPareto), &frmPareto); Application->Run(); } catch (Exception &exception) { Application->ShowException(&exception); } return 0; } //---------------------------------------------------------------------------