home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / BC_502 / APPEXPRT.PAK / TDLGCLIE.OWL < prev    next >
Encoding:
Text File  |  1997-05-06  |  3.5 KB  |  138 lines
  1. <<[H]TDlgClient [[TDialog]]
  2. ##{hheader.snp}
  3. ##@OPT_APPL_DOCVIEW 2
  4. #include <owl/docview.h>
  5.  
  6. ##<<TApplication QUERY_FILENAME_CPP [[Filename]]
  7. #include "[[Filename]].rh"                  // Definition of all resources.
  8.  
  9.  
  10. ##--BEGIN-- !@OPT_APPL_DOCVIEW
  11. //{{TDialog = [[TDialog]]}}
  12. class [[TDialog]] : public TDialog {
  13.   public:
  14. ##QUERY_DLOG [[DLogRsrc]]
  15.     [[TDialog]](TWindow* parent, TResId resId = [[DLogRsrc]], TModule* module = 0);
  16.     virtual ~[[TDialog]]();
  17.  
  18. };    //{{[[TDialog]]}}
  19. ##--END-- !@OPT_APPL_DOCVIEW
  20. ##--BEGIN-- @OPT_APPL_DOCVIEW
  21. //{{TDialog = [[TDialog]]}}
  22. class [[TDialog]] : public TDialog, public TView {
  23.   public:
  24. ##QUERY_DLOG [[DLogRsrc]]
  25. //  [[TDialog]](TWindow* parent, TResId resId = [[DLogRsrc]], TModule* module = 0);  //{{DIALOG_ASSOCIATION}}
  26.  
  27.     [[TDialog]](TDocument& doc, TWindow* parent = 0);
  28.     virtual ~[[TDialog]]();
  29.  
  30.     static const char far* StaticName() {return "Dialog View";}  // put in resource
  31.  
  32.     // Inherited virtuals from TView
  33.     //
  34.     const char far* GetViewName() {return StaticName();}
  35.     TWindow* GetWindow() {return(TWindow*)this;}
  36.     bool     SetDocTitle(const char far* docname, int index)
  37.              { return TWindow::SetDocTitle(docname, index); }
  38.   private:
  39.     // Event handlers
  40.     //
  41.     bool     VnIsWindow(HWND hWnd)
  42.              { return ((HWindow == hWnd) || IsChild(hWnd)); }
  43.  
  44. //{{[[TDialog]]VIRTUAL_BEGIN}}
  45.   public:
  46.     virtual bool CanClose();
  47. ##:DBVirtual(\\"[[TDialog]]", "CanClose")
  48. //{{[[TDialog]]VIRTUAL_END}}
  49.  
  50. //{{[[TDialog]]RSP_TBL_BEGIN}}
  51.   protected:
  52. //{{[[TDialog]]RSP_TBL_END}}
  53. DECLARE_RESPONSE_TABLE([[TDialog]]);
  54. };    //{{[[TDialog]]}}
  55. ##--END-- @OPT_APPL_DOCVIEW
  56. ##{hfooter.snp}
  57. >>[H]TDlgClient [[TDialog]]
  58.  
  59.  
  60. <<[CPP]TDlgClient [[TDialog]]
  61. ##{cheader.snp}
  62. #include <owl/pch.h>
  63.  
  64. ##<<TApplication QUERY_FILE_H [[FileName]]
  65. #include "[[FileName]]"
  66. ##QUERY_FILE_H [[FileName]]
  67. #include "[[FileName]]"
  68.  
  69.  
  70. //{{[[TDialog]] Implementation}}
  71.  
  72.  
  73. ##--BEGIN-- !@OPT_APPL_DOCVIEW
  74. ##      --BEGIN-- @QUERY_APPL_COMMENT == VALUE_VERBOSE
  75. //--------------------------------------------------------
  76. // [[TDialog]]
  77. // ~~~~~~~~~~
  78. // Construction/Destruction handling.
  79. //
  80. ##      --END-- @QUERY_APPL_COMMENT == VALUE_VERBOSE
  81. [[TDialog]]::[[TDialog]](TWindow* parent, TResId resId, TModule* module)
  82. :
  83.   TDialog(parent, resId, module)
  84. {
  85.   // INSERT>> Your constructor code here.
  86. }
  87.  
  88.  
  89. [[TDialog]]::~[[TDialog]]()
  90. {
  91.   Destroy();
  92.  
  93.   // INSERT>> Your destructor code here.
  94. }
  95. ##--END-- !@OPT_APPL_DOCVIEW
  96. ##--BEGIN-- @OPT_APPL_DOCVIEW
  97. //
  98. // Build a response table for all messages/commands handled
  99. // by the application.
  100. //
  101. DEFINE_RESPONSE_TABLE1([[TDialog]], TDialog)
  102. //{{[[TDialog]]RSP_TBL_BEGIN}}
  103. //{{[[TDialog]]RSP_TBL_END}}
  104. END_RESPONSE_TABLE;
  105.  
  106.  
  107. ##      --BEGIN-- @QUERY_APPL_COMMENT == VALUE_VERBOSE
  108. //--------------------------------------------------------
  109. // [[TDialog]]
  110. // ~~~~~~~~~~
  111. // Construction/Destruction handling.
  112. //
  113. ##      --END-- @QUERY_APPL_COMMENT == VALUE_VERBOSE
  114. [[TDialog]]::[[TDialog]](TDocument& doc, TWindow* parent)
  115. ##:     @QUERY_APPL_DLGCLIENT [[ClientClass]]
  116. ##:     <<*ClientClass QUERY_DLOG [[DLogRsrc]] 2
  117. :
  118.   TView(doc), TDialog(parent, [[DLogRsrc]])
  119. {
  120.   // INSERT>> Your constructor code here.
  121.  
  122. }
  123.  
  124.  
  125. [[TDialog]]::~[[TDialog]]()
  126. {
  127.   // INSERT>> Your destructor code here.
  128.  
  129. }
  130.  
  131.  
  132. bool [[TDialog]]::CanClose()
  133. {
  134.   return TWindow::CanClose() && Doc->CanClose();
  135. }
  136. ##--END-- @OPT_APPL_DOCVIEW
  137. >>[CPP]TDlgClient [[TDialog]]
  138.