www.gusucode.com > Delphi刻录软件源码程序 > Delphi刻录软件源码程序/ym_MagicCDDVDBurnerVCL-hicode/Examples/FullDemo/mcdb.cpp
//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop USERES("mcdb.res"); USEFORMNS("Unit5.pas", Unit5, Form5); USEFORMNS("DeviceCaps.pas", Devicecaps, Form2); USEFORMNS("DiscLayout.pas", Disclayout, frmDiscLayout); USEFORMNS("ImportSession.pas", Importsession, frmSessions); USEFORMNS("TreeView.pas", Treeview, frmTree); USEFORMNS("Unit1.pas", Unit1, Form1); USEFORMNS("Unit2.pas", Unit2, frmSettings); //--------------------------------------------------------------------------- WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize(); Application->CreateForm(__classid(TForm1), &Form1); Application->CreateForm(__classid(TfrmSettings), &frmSettings); Application->Run(); } catch (Exception &exception) { Application->ShowException(&exception); } return 0; } //---------------------------------------------------------------------------