home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 February / Chip_2004-02_cd1.bin / program / delphi / navody / d56 / ec1vr2.exe / #setuppath# / CB6 / 2DTable / Table2D.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  2003-12-09  |  1.0 KB  |  28 lines

  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  4. USERES("Table2D.res");
  5. USEFORM("Main.cpp", MainForm);
  6. USEFORM("About.cpp", AboutBox);
  7. USEFORM("dm.cpp", DModule);
  8. USEFORM("Report.cpp", RepForm);
  9. //---------------------------------------------------------------------------
  10. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  11. {
  12.         try
  13.         {
  14.                  Application->Initialize();
  15.                  Application->CreateForm(__classid(TMainForm), &MainForm);
  16.                  Application->CreateForm(__classid(TAboutBox), &AboutBox);
  17.                  Application->CreateForm(__classid(TDModule), &DModule);
  18.                  Application->CreateForm(__classid(TRepForm), &RepForm);
  19.                  Application->Run();
  20.         }
  21.         catch (Exception &exception)
  22.         {
  23.                  Application->ShowException(&exception);
  24.         }
  25.         return 0;
  26. }
  27. //---------------------------------------------------------------------------
  28.