home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / Bonus / Plasmatech / ptscp_examples.exe / %MAINDIR% / Examples / Translation / CBuilder / TrDemo.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  2001-08-31  |  720 b   |  24 lines
  1. //---------------------------------------------------------------------------
  2. #include <vcl\vcl.h>
  3. #pragma hdrstop
  4. //---------------------------------------------------------------------------
  5. USEFORM("FMain.cpp", FrmMain);
  6. USERES("TrDemo.res");
  7. //---------------------------------------------------------------------------
  8. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  9. {
  10.     try
  11.     {
  12.         Application->Initialize();
  13.         Application->Title = "TrDemo";
  14.         Application->CreateForm(__classid(TFrmMain), &FrmMain);
  15.         Application->Run();
  16.     }
  17.     catch (Exception &exception)
  18.     {
  19.         Application->ShowException(&exception);
  20.     }
  21.     return 0;
  22. }
  23. //---------------------------------------------------------------------------
  24.