project1.~cpp

这是我们班实习的时候做的一个宠物医院管理系统。sql数据库

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

#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("Unit1.cpp", frmLogin_ytc);
USEFORM("Unit2.cpp", frmMain_ytc);
USEFORM("Unit3.cpp", frmClinicInfo_ytc);
USEFORM("Unit4.cpp", frmEmployeeInfo_ytc);
USEFORM("Unit5.cpp", frmPetinfo_zcq);
USEFORM("Unit6.cpp", frmcusinfo_yzg);
USEFORM("Unit7.cpp", Form7);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {
                 Application->Initialize();
                 Application->CreateForm(__classid(Tfrmcusinfo_yzg), &frmcusinfo_yzg);
                 Application->CreateForm(__classid(TfrmPetinfo_zcq), &frmPetinfo_zcq);
                 Application->CreateForm(__classid(TfrmClinicInfo_ytc), &frmClinicInfo_ytc);
                 Application->CreateForm(__classid(TfrmLogin_ytc), &frmLogin_ytc);
                 Application->CreateForm(__classid(TfrmMain_ytc), &frmMain_ytc);
                 Application->CreateForm(__classid(TfrmEmployeeInfo_ytc), &frmEmployeeInfo_ytc);
                 Application->CreateForm(__classid(TForm7), &Form7);
                 Application->Run();
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        catch (...)
        {
                 try
                 {
                         throw Exception("");
                 }
                 catch (Exception &exception)
                 {
                         Application->ShowException(&exception);
                 }
        }
        return 0;
}
//---------------------------------------------------------------------------