home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / BC_502 / SIMBOR.PAK / APP.CPP next >
Encoding:
C/C++ Source or Header  |  1997-05-06  |  771 b   |  44 lines
  1. // ---------------------------------------------------------------------------
  2. // ObjectWindows
  3. // Copyright (C) 1995, 1995 by Borland International, All Rights Reserved
  4. // ---------------------------------------------------------------------------
  5. #include <owl/pch.h>
  6. #include "SimBor.h"
  7.  
  8. //
  9. // Application constructor
  10. //
  11. TSimBorApp::TSimBorApp()
  12. :
  13.   TApplication()
  14. {
  15. }
  16.  
  17. //
  18. // Application destructor
  19. //
  20. TSimBorApp::~TSimBorApp()
  21. {
  22. }
  23.  
  24. //
  25. // InitMainWindow
  26. //
  27. void
  28. TSimBorApp::InitMainWindow()
  29. {
  30.   SetMainWindow(new TFrameWindow(0, "SimBor application", new TSimBorWindow));
  31.   GetMainWindow()->AssignMenu(IDM_MAINMENU);
  32. }
  33.  
  34. //
  35. // OwlMain
  36. //
  37. int
  38. OwlMain(int /*argc*/, char* /*argv*/ [])
  39. {
  40.   TSimBorApp app;
  41.   return app.Run();
  42. }
  43.  
  44.