//--------------------------------------------------------------------------- #include #pragma hdrstop //--------------------------------------------------------------------------- #include "define.h" //--------------------------------------------------------------------------- USERES("Configuration.res"); USEFORM("\\211.238.177.140\W_Drive_Source\TexTricot\TpwTest\Config\Config_F.cpp", ConfigForm); USEUNIT("\\211.238.177.140\W_Drive_Source\TexTricot\TpwTest\Config\Define.cpp"); USEUNIT("\\211.238.177.140\W_Drive_Source\TexTricot\TpwTest\TexTricot\ProtectCard.cpp"); //--------------------------------------------------------------------------- WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize(); Application->Title = "TexTricot CAD System Configuration"; Application->CreateForm(__classid(TConfigForm), &ConfigForm); Application->Run(); } catch (Exception &exception) { Application->ShowException(&exception); } return 0; } //---------------------------------------------------------------------------