www.gusucode.com > Delphi刻录软件源码程序 > Delphi刻录软件源码程序/ym_MagicCDDVDBurnerVCL-hicode/Examples/FullDemoC/mcdb.cpp

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

#include <vcl.h>
#pragma hdrstop
USEFORM("ConfigurationSettings.cpp", frmSettings);
USEFORM("DiscLayout.cpp", frmDiscLayout);
USEFORM("ImportSession.cpp", frmSession);
USEFORM("TreeView.cpp", frmTree);
USEFORM("Unit1.cpp", Form1);
USEFORM("Unit2.cpp", Form2);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {
                 Application->Initialize();
                 Application->Title = "Magic CD/DVD Burner 1.23";
		Application->CreateForm(__classid(TForm1), &Form1);
                 Application->CreateForm(__classid(TfrmSettings), &frmSettings);
                 Application->CreateForm(__classid(TfrmDiscLayout), &frmDiscLayout);
                 Application->CreateForm(__classid(TfrmSession), &frmSession);
                 Application->CreateForm(__classid(TfrmTree), &frmTree);
                 Application->CreateForm(__classid(TForm2), &Form2);
                 Application->Run();
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        return 0;
}
//---------------------------------------------------------------------------