cheyou.cpp

某车友管理系统的源码

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

#include <vcl.h>
#pragma hdrstop
USERES("CheYou.res");
USEFORM("SplashForm.cpp", SplashFormWin);
USEFORM("MainForm.cpp", MainFormWin);
USEFORM("AddRecordForm.cpp", RecordFormWin);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {        Application->Initialize();
               
                 Application->Title = "科学乘车友俱乐部会员档案管理系统";


                 Application->CreateForm(__classid(TSplashFormWin), &SplashFormWin);
                 Application->CreateForm(__classid(TMainFormWin), &MainFormWin);
                 Application->Run();
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        return 0;
}
//---------------------------------------------------------------------------