home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / BC_502 / STEP16.PAK / STEP16.H < prev    next >
Encoding:
C/C++ Source or Header  |  1997-05-06  |  1.4 KB  |  48 lines
  1. //----------------------------------------------------------------------------
  2. // ObjectWindows - (C) Copyright 1994 by Borland International
  3. //   Tutorial application -- step16.h
  4. //   Automation Server example
  5. //----------------------------------------------------------------------------
  6. #if !defined(STEP16_H)
  7. #define STEP16_H
  8.  
  9. class TDrawDocument;
  10.  
  11. class TDrawApp : public TApplication, public TOcModule {
  12.   public:
  13.     TDrawApp();
  14.  
  15.   protected:
  16.     TMDIClient* Client;
  17.  
  18.     // Override methods of TApplication
  19.     void InitInstance();
  20.     void InitMainWindow();
  21.  
  22.     // Event handlers
  23.     void EvNewView(TView& view);
  24.     void EvCloseView(TView& view);
  25.     void EvDropFiles(TDropInfo dropInfo);
  26.     void CmAbout();
  27.  
  28.   private:
  29.     // Automation entry points
  30.     void SetShow(bool visible);
  31.     bool GetShow();
  32.     TDrawDocument* AddDoc();
  33.     TDrawDocument* OpenDoc(const char far* name = 0);
  34.     const char far* GetPath();
  35.     // method of TModule ==> const char far* GetName()
  36.  
  37.   DECLARE_RESPONSE_TABLE(TDrawApp);
  38.  
  39.   DECLARE_AUTOAGGREGATE(TDrawApp)
  40.     AUTOPROP  (Visible, GetShow,SetShow,      TBool, )
  41.     AUTOFUNC0 (NewDoc,  OpenDoc, TAutoObject<TDrawDocument>, )
  42.     AUTOFUNC1 (OpenDoc, OpenDoc, TAutoObject<TDrawDocument>,TAutoString,)
  43.     AUTOPROPRO(AppName, GetName, TAutoString, )
  44.     AUTOPROPRO(FullName,GetPath, TAutoString, )
  45. };
  46.  
  47. #endif
  48.