home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0040 - 0049 / ibm0040-0049 / ibm0040.tar / ibm0040 / BCPPOWL1.ZIP / OWLDEMOS.ZIP / HELLOAPP.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1991-08-28  |  782 b   |  29 lines
  1. // ObjectWindows - (C) Copyright 1991 by Borland International
  2.  
  3. #include <owl.h>
  4.  
  5. // Define a class derived from TApplication
  6. class THelloApp :public TApplication
  7. {
  8. public:
  9.   THelloApp(LPSTR AName, HANDLE hInstance, HANDLE hPrevInstance, 
  10.     LPSTR lpCmdLine, int nCmdShow)
  11.     : TApplication(AName, hInstance, hPrevInstance, lpCmdLine, nCmdShow) {};
  12.   virtual void InitMainWindow();
  13. };
  14.  
  15. // Construct the THelloApp's MainWindow data member
  16. void THelloApp::InitMainWindow()
  17. {
  18.   MainWindow = new TWindow(NULL, "Hello World!");
  19. }
  20.  
  21. int PASCAL WinMain(HANDLE hInstance, HANDLE hPrevInstance,
  22.   LPSTR lpCmdLine, int nCmdShow)
  23. {
  24.   THelloApp HelloApp ("HelloApp", hInstance, hPrevInstance,
  25.     lpCmdLine, nCmdShow);
  26.   HelloApp.Run();
  27.   return HelloApp.Status;
  28. }
  29.