kserp.cpp

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· C++ 代码 · 共 35 行

//---------------------------------------------------------------------------
#include <vcl.h>
USEUNIT("KSMenu.cpp");
USERES("KSERP.res");
USERES("sdSubpic.res");
USERES("SdNavPic.res");
USERES("SdPriPic.res");
USERES("SdMenuPic.res");
USERES("main.res");
USEFORM("MainForm.cpp", frmMainForm);
USEFORM("Login.cpp", frmLogin);
USEFORM("WaitForm.cpp", frmWaitForm);
USELIB("KSCLMgr.lib");
USELIB("..\BaseForm\TBase\KSBase.lib");
//---------------------------------------------------------------------------
#pragma hdrstop
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
  try
  {
     Application->Initialize();
     Application->Title = "KS-ERP企业资源管理系统";
     Application->CreateForm(__classid(TfrmMainForm), &frmMainForm);
                 Application->Run();
  }
  catch (Exception &exception)
  {
     Application->ShowException(&exception);
  }
  return 0;
}
//---------------------------------------------------------------------------