home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 March / Chip_2002-03_cd1.bin / zkuste / delphi / kompon / d5 / cak / CAKINST.ZIP / cmarc139.lzh / DEMOCB.LZH / DEMOCB5.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  2000-07-23  |  782 b   |  26 lines
  1. //---------------------------------------------------------------------------
  2.  
  3. #include <vcl.h>
  4. #pragma hdrstop
  5. USERES("DEMOCB5.res");
  6. USEFORM("DEMOCBF.cpp", frmDemoCB);
  7. USEFORMNS("LHPRGDLG.PAS", Lhprgdlg, dlgArchiverProgress);
  8. USEUNIT("Archives.pas");
  9. //---------------------------------------------------------------------------
  10. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  11. {
  12.     try
  13.     {
  14.         Application->Initialize();
  15.         Application->CreateForm(__classid(TfrmDemoCB), &frmDemoCB);
  16.         Application->CreateForm(__classid(TdlgArchiverProgress), &dlgArchiverProgress);
  17.         Application->Run();
  18.     }
  19.     catch (Exception &exception)
  20.     {
  21.         Application->ShowException(&exception);
  22.     }
  23.     return 0;
  24. }
  25. //---------------------------------------------------------------------------
  26.