//--------------------------------------------------------------------------- #include #pragma hdrstop USEFORM("kerhowin.cpp", Naytto); USERES("winkerho.res"); USEUNIT("..\..\..\ali\mjonotpp.cpp"); USEUNIT("..\..\..\ali\mjonot.c"); USEUNIT("..\jasen.cpp"); USEUNIT("..\jasenet.cpp"); USEUNIT("..\kentta.cpp"); USEUNIT("..\kerho.cpp"); USEUNIT("..\muunnos.c"); USEUNIT("..\..\..\ali\pvm.c"); USEUNIT("..\..\..\ali\help.c"); USEUNIT("omat.cpp"); USEFORM("jasenf.cpp", JasenForm); USEFORM("kysydlg.cpp", KysyDlg); USEFORM("memodlg.cpp", MemoDialog); USEFORM("ohjetus.cpp", Ohjeet); USEUNIT("demo.cpp"); //--------------------------------------------------------------------------- WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize(); Application->CreateForm(__classid(TNaytto), &Naytto); Application->CreateForm(__classid(TKysyDlg), &KysyDlg); Application->CreateForm(__classid(TMemoDialog), &MemoDialog); Application->CreateForm(__classid(TOhjeet), &Ohjeet); Application->Run(); } catch (Exception &exception) { Application->ShowException(&exception); } return 0; } //---------------------------------------------------------------------------