home *** CD-ROM | disk | FTP | other *** search
/ distrib.akp.su/Programming/Vb-6+Rus/ / distrib.akp.su.tar / distrib.akp.su / Programming / Vb-6+Rus / COMMON / MSDEV98 / BIN / IDE / PROPSHT.DLL / TEMPLATE / 22347 < prev    next >
Text File  |  1998-06-18  |  1KB  |  38 lines
  1.     // TODO: The property sheet attached to your project
  2.     // via this function is not hooked up to any message
  3.     // handler.  In order to actually use the property sheet,
  4.     // you will need to associate this function with a control
  5.     // in your project such as a menu item or tool bar button.
  6.     //
  7.     // If mini frame does not already exist, create a new one.
  8.     // Otherwise, unhide it
  9.  
  10.     if ($$VAL:FramePointer$$ == NULL)
  11.     {
  12.         $$VAL:FramePointer$$ = new $$VAL:FRAMECLASS$$;
  13.         CRect rect(0, 0, 0, 0);
  14.         CString strTitle;
  15.         VERIFY(strTitle.LoadString($$VAL:SheetCaption$$));
  16.  
  17. $$IF:!WNDCLASS$$
  18.         // TODO: Warning: Your base class isn't a CWnd type
  19.         // so the menu will be created with a parent HWND of NULL.
  20. $$ENDIF$$
  21.         if (!$$VAL:FramePointer$$->Create(NULL, strTitle,
  22.             WS_POPUP | WS_CAPTION | WS_SYSMENU, rect$$IF:WNDCLASS$$, this$$ENDIF$$))
  23.         {
  24.             delete $$VAL:FramePointer$$;
  25.             $$VAL:FramePointer$$ = NULL;
  26.             return;
  27.         }
  28.         $$VAL:FramePointer$$->CenterWindow();
  29.     }
  30.  
  31.     // Before unhiding the modeless property sheet, update its
  32.     // settings appropriately.  For example, if you are reflecting
  33.     // the state of the currently selected item, pick up that
  34.     // information from the active view and change the property
  35.     // sheet settings now.
  36.  
  37.     if ($$VAL:FramePointer$$ != NULL && !$$VAL:FramePointer$$->IsWindowVisible())
  38.         $$VAL:FramePointer$$->ShowWindow(SW_SHOW);