jxc.cpp

来自「C++ Builder数据库开发经典案例解析 示例程序都是在C++ Build」· C++ 代码 · 共 36 行

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
USEFORM("Main.cpp", fmMain);
USEFORM("db.cpp", DataModule1); /* TDataModule: File Type */
USEFORM("GoodManage.cpp", fmGoodManage);
USEFORM("SupplyManage.cpp", fmSupplyManage);
USEFORM("CustomManage.cpp", fmCustomManage);
USEFORM("PurchaseManage.cpp", fmPurchaseManage);
USEFORM("login.cpp", fmLogin);
USEFORM("print.cpp", fmPrint);
USEFORM("SaleManage.cpp", fmSaleManage);
USEFORM("selectstore.cpp", fmSelectStore);
USEFORM("StoreQuery.cpp", fmStoreQuery);
USEFORM("Right.cpp", fmRightManage);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
    try
    {
         Application->Initialize();
         Application->Title = "进销存管理系统";
         Application->CreateForm(__classid(TDataModule1), &DataModule1);
         Application->CreateForm(__classid(TfmMain), &fmMain);
         Application->CreateForm(__classid(TfmPrint), &fmPrint);
         Application->Run();
    }
    catch (Exception &exception)
    {
         Application->ShowException(&exception);
    }
    return 0;
}
//---------------------------------------------------------------------------