gxc.cpp

供销存软件

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

#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("DataModule.cpp", DM); /* TDataModule: File Type */
USEFORM("SPinfo.cpp", SPForm);
USEFORM("SPLBinfo.cpp", LBForm);
USEFORM("KHinfo.cpp", KHForm);
USEFORM("QYinfo.cpp", QYForm);
USEFORM("CKinfo.cpp", CKForm);
USEFORM("BMinfo.cpp", BMForm);
USEFORM("KMinfo.cpp", KMForm);
USEFORM("JSinfo.cpp", JSForm);
USEFORM("workinfo.cpp", workForm);
USEFORM("QXinfo.cpp", QXForm);
USEFORM("mmEdit.cpp", mmForm);
USEFORM("inCK_manage.cpp", inForm);
USEFORM("addSP.cpp", addSPForm);
USEFORM("addKH.cpp", addKHForm);
USEFORM("outSP_manage.cpp", outSPForm);
USEFORM("ZK_manage.cpp", zkForm);
USEFORM("outCK_manage.cpp", outCKForm);
USEFORM("TK_manage.cpp", tkForm);
USEFORM("BS_manage.cpp", bsForm);
USEFORM("startPD.cpp", pdForm);
USEFORM("pdData.cpp", pdindataForm);
USEFORM("toYK.cpp", ykForm);
USEFORM("inoutXJ.cpp", ioXJForm);
USEFORM("oneJSD.cpp", oneJSForm);
USEFORM("fdJSD.cpp", fdJSForm);
USEFORM("mRecord.cpp", mRecordForm);
USEFORM("KemuTji.cpp", kmtjForm);
USEFORM("wage.cpp", wageForm);
USEFORM("BMwage.cpp", BMwageForm);
USEFORM("inoutSum.cpp", ioSumForm);
USEFORM("MdayBao.cpp", MdayBaoForm);
USEFORM("cageSum.cpp", cageSumForm);
USEFORM("outBG.cpp", outBGForm);
USEFORM("YKpdSeach.cpp", YKpdSeachForm);
USEFORM("ioSearch.cpp", ioSearchForm);
USEFORM("iosearchEnd.cpp", iosearchEndForm);
USEFORM("SPyxDay.cpp", SPyxDayForm);
USEFORM("SPkcSeach.cpp", SPkcForm);
USEFORM("KHsum.cpp", KHsumForm);
USEFORM("KHsale.cpp", KHsaleForm);
USEFORM("LBsale.cpp", LBsaleForm);
USEFORM("aSPsale.cpp", aSPsaleForm);
USEFORM("SPiofs.cpp", iofsForm);
USEFORM("QYsale.cpp", QYsaleForm);
USEFORM("KHpay.cpp", KHpayForm);
USEFORM("help.cpp", helpForm);
USEFORM("login.cpp", LoginForm);
USEFORM("main.cpp", mainForm);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {
                 Application->Initialize();
                 Application->Title = "小刀儿进销存管理软件   何建昭制作";
                 Application->CreateForm(__classid(TDM), &DM);
                 Application->CreateForm(__classid(TLoginForm), &LoginForm);
                 Application->CreateForm(__classid(TmainForm), &mainForm);
                 Application->Run();
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        catch (...)
        {
                 try
                 {
                         throw Exception("");
                 }
                 catch (Exception &exception)
                 {
                         Application->ShowException(&exception);
                 }
        }
        return 0;
}
//---------------------------------------------------------------------------