1 //---------------------------------------------------------------------------
5 //---------------------------------------------------------------------------
6 USEFORM("dbcedit.cpp", FrmMain
);
7 USEFORM("TitleFrm.cpp", FrmTitle
);
8 USEFORM("SearchFrm.cpp", FrmSearch
);
9 //---------------------------------------------------------------------------
10 WINAPI
WinMain(HINSTANCE
, HINSTANCE
, LPSTR
, int)
14 Application
->Initialize();
15 Application
->CreateForm(__classid(TFrmMain
), &FrmMain
);
16 Application
->CreateForm(__classid(TFrmTitle
), &FrmTitle
);
17 Application
->CreateForm(__classid(TFrmSearch
), &FrmSearch
);
20 catch (Exception
&exception
)
22 Application
->ShowException(&exception
);
30 catch (Exception
&exception
)
32 Application
->ShowException(&exception
);
37 //---------------------------------------------------------------------------