home *** CD-ROM | disk | FTP | other *** search
/ Tricks of the Windows Gam…ming Gurus (2nd Edition) / Disc2.iso / msdn_vcb / samples / vc98 / sdk / com / inole2 / chap24 / patron / iclisite.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1995-05-03  |  7.3 KB  |  333 lines
  1. /*
  2.  * ICLISITE.CPP
  3.  * Patron Chapter 24
  4.  *
  5.  * Implementation of the IOleClientSite interface for
  6.  * Patron's tenants.
  7.  *
  8.  * Copyright (c)1993-1995 Microsoft Corporation, All Rights Reserved
  9.  *
  10.  * Kraig Brockschmidt, Microsoft
  11.  * Internet  :  kraigb@microsoft.com
  12.  * Compuserve:  >INTERNET:kraigb@microsoft.com
  13.  */
  14.  
  15.  
  16. #include "patron.h"
  17.  
  18.  
  19. /*
  20.  * CImpIOleClientSite::CImpIOleClientSite
  21.  * CImpIOleClientSite::~CImpIOleClientSite
  22.  *
  23.  * Parameters (Constructor):
  24.  *  pTenant         PCTenant of the tenant we're in.
  25.  *  pUnkOuter       LPUNKNOWN to which we delegate.
  26.  */
  27.  
  28. CImpIOleClientSite::CImpIOleClientSite(PCTenant pTenant
  29.     , LPUNKNOWN pUnkOuter)
  30.     {
  31.     m_cRef=0;
  32.     m_pTen=pTenant;
  33.     m_pUnkOuter=pUnkOuter;
  34.     return;
  35.     }
  36.  
  37. CImpIOleClientSite::~CImpIOleClientSite(void)
  38.     {
  39.     return;
  40.     }
  41.  
  42.  
  43.  
  44.  
  45. /*
  46.  * CImpIOleClientSite::QueryInterface
  47.  * CImpIOleClientSite::AddRef
  48.  * CImpIOleClientSite::Release
  49.  *
  50.  * Purpose:
  51.  *  IUnknown members for CImpIOleClientSite object.
  52.  */
  53.  
  54. STDMETHODIMP CImpIOleClientSite::QueryInterface(REFIID riid
  55.     , PPVOID ppv)
  56.     {
  57.     return m_pUnkOuter->QueryInterface(riid, ppv);
  58.     }
  59.  
  60.  
  61. STDMETHODIMP_(ULONG) CImpIOleClientSite::AddRef(void)
  62.     {
  63.     ++m_cRef;
  64.     return m_pUnkOuter->AddRef();
  65.     }
  66.  
  67. STDMETHODIMP_(ULONG) CImpIOleClientSite::Release(void)
  68.     {
  69.     --m_cRef;
  70.     return m_pUnkOuter->Release();
  71.     }
  72.  
  73.  
  74.  
  75.  
  76. /*
  77.  * CImpIOleClientSite::SaveObject
  78.  *
  79.  * Purpose:
  80.  *  Requests that the container call OleSave for the object that
  81.  *  lives here.  Typically this happens on server shutdown.
  82.  *
  83.  * Parameters:
  84.  *  None
  85.  *
  86.  * Return Value:
  87.  *  HRESULT         Standard.
  88.  */
  89.  
  90. STDMETHODIMP CImpIOleClientSite::SaveObject(void)
  91.     {
  92.     //We're already set up with the tenant to save; this is trivial.
  93.     m_pTen->Update();
  94.     return NOERROR;
  95.     }
  96.  
  97.  
  98.  
  99.  
  100.  
  101. /*
  102.  * CImpIOleClientSite::GetMoniker
  103.  *
  104.  * Purpose:
  105.  *  Retrieves the moniker for the site in which this object lives,
  106.  *  either the moniker relative to the container or the full
  107.  *  moniker.
  108.  *
  109.  * Parameters:
  110.  *  dwAssign        DWORD specifying that the object wants moniker
  111.  *                  assignment.  Yeah.  Right.  Got any bridges to
  112.  *                  sell?
  113.  *  dwWhich         DWORD identifying which moniker the object
  114.  *                  wants, either the container's moniker, the
  115.  *                  moniker relative to this client site, or the
  116.  *                  full moniker.
  117.  *
  118.  * Return Value:
  119.  *  HRESULT         Standard.
  120.  */
  121.  
  122. STDMETHODIMP CImpIOleClientSite::GetMoniker(DWORD dwAssign
  123.     , DWORD dwWhich, LPMONIKER *ppmk)
  124.     {
  125.     *ppmk=NULL;
  126.  
  127.     switch (dwWhich)
  128.         {
  129.         case OLEWHICHMK_CONTAINER:
  130.             //This is just the file we're living in.
  131.             if (NULL!=m_pTen->m_pmkFile)
  132.                 *ppmk=m_pTen->m_pmkFile;
  133.  
  134.             break;
  135.  
  136.         case OLEWHICHMK_OBJREL:
  137.             //This is everything but the filename.
  138.             if (NULL!=m_pTen->m_pmk)
  139.                 *ppmk=m_pTen->m_pmk;
  140.  
  141.             break;
  142.  
  143.         case OLEWHICHMK_OBJFULL:
  144.             //Concatenate file and relative monikers for this one.
  145.             if (NULL!=m_pTen->m_pmkFile && NULL!=m_pTen->m_pmk)
  146.                 {
  147.                 return m_pTen->m_pmkFile->ComposeWith
  148.                     (m_pTen->m_pmk, FALSE, ppmk);
  149.                 }
  150.  
  151.             break;
  152.         }
  153.  
  154.     if (NULL==*ppmk)
  155.         return ResultFromScode(E_FAIL);
  156.  
  157.     (*ppmk)->AddRef();
  158.     return NOERROR;
  159.     }
  160.  
  161.  
  162.  
  163.  
  164.  
  165.  
  166. /*
  167.  * CImpIOleClientSite::GetContainer
  168.  *
  169.  * Purpose:
  170.  *  Returns a pointer to the document's IOleContainer interface.
  171.  *
  172.  * Parameters:
  173.  *  ppContainer     LPOLECONTAINER * in which to return the
  174.  *                  interface.
  175.  *
  176.  * Return Value:
  177.  *  HRESULT         Standard.
  178.  */
  179.  
  180. STDMETHODIMP CImpIOleClientSite::GetContainer(LPOLECONTAINER
  181.     * ppContainer)
  182.     {
  183.     PCPage  pPage;
  184.  
  185.     *ppContainer=NULL;
  186.  
  187.     /*
  188.      * Here we want to get the interface on the page we're in.
  189.      * The function we call in CPages does not AddRef the page, but
  190.      * QueryInterface does.
  191.      */
  192.     m_pTen->m_pPG->IPageGetFromID((DWORD)-1L, &pPage, FALSE);
  193.  
  194.     if (NULL!=pPage)
  195.         {
  196.         return pPage->QueryInterface(IID_IOleItemContainer
  197.             , (PPVOID)ppContainer);
  198.         }
  199.  
  200.     return ResultFromScode(E_FAIL);
  201.     }
  202.  
  203.  
  204.  
  205.  
  206.  
  207.  
  208. /*
  209.  * CImpIOleClientSite::ShowObject
  210.  *
  211.  * Purpose:
  212.  *  Tells the container to bring the object fully into view as much
  213.  *  as possible, that is, scroll the document.
  214.  *
  215.  * Parameters:
  216.  *  None
  217.  *
  218.  * Return Value:
  219.  *  HRESULT         Standard.
  220.  */
  221.  
  222. STDMETHODIMP CImpIOleClientSite::ShowObject(void)
  223.     {
  224.     HWND        hWnd, hWndT;
  225.  
  226.     /*
  227.      * We let the tenant do this, since it can access the current
  228.      * scroll position as a friend of CPages whereas we cannot.
  229.      */
  230.  
  231.     //Don't try to show objects that are always active.
  232.     if (!((OLEMISC_INSIDEOUT | OLEMISC_ACTIVATEWHENVISIBLE)
  233.         & m_pTen->m_grfMisc))
  234.         m_pTen->ShowYourself();
  235.  
  236.     //For linking to embedding, show the main window.
  237.     hWndT=GetParent(m_pTen->m_hWnd);
  238.  
  239.     while (NULL!=hWndT)
  240.         {
  241.         hWnd=hWndT;
  242.         hWndT=GetParent(hWnd);
  243.         }
  244.  
  245.     ShowWindow(hWnd, SW_SHOWNOACTIVATE);
  246.     m_pTen->UpdateInPlaceObjectRects(NULL, TRUE);
  247.     return NOERROR;
  248.     }
  249.  
  250.  
  251.  
  252.  
  253.  
  254.  
  255. /*
  256.  * CImpIOleClientSite::OnShowWindow
  257.  *
  258.  * Purpose:
  259.  *  Informs the container if the object is showing itself or
  260.  *  hiding itself.  This is done only in the opening mode and allows
  261.  *  the container to know when to shade or unshade the object.
  262.  *
  263.  * Parameters:
  264.  *  fShow           BOOL indiciating that the object is being shown
  265.  *                  (TRUE) or hidden (FALSE).
  266.  * Return Value:
  267.  *  HRESULT         Standard.
  268.  */
  269.  
  270. STDMETHODIMP CImpIOleClientSite::OnShowWindow(BOOL fShow)
  271.     {
  272.     //All we have to do is tell the tenant of the open state change.
  273.     m_pTen->ShowAsOpen(fShow);
  274.     return NOERROR;
  275.     }
  276.  
  277.  
  278.  
  279.  
  280.  
  281.  
  282. //CHAPTER24MOD
  283. /*
  284.  * CImpIOleClientSite::RequestNewObjectLayout
  285.  *
  286.  * Purpose:
  287.  *  Called when the object would like to have its layout
  288.  *  reinitialized.  This is used by OLE Controls.
  289.  *
  290.  * Parameters:
  291.  *  None
  292.  *
  293.  * Return Value:
  294.  *  HRESULT         Standard.
  295.  */
  296.  
  297. STDMETHODIMP CImpIOleClientSite::RequestNewObjectLayout(void)
  298.     {
  299.     RECT    rc, rcT;
  300.     SIZEL   szl;
  301.     HRESULT hr;
  302.  
  303.     /*
  304.      * This function is called by a control that is not in-place
  305.      * active or UI active and therefore doesn't have our
  306.      * IOleInPlaceSite interface in which to call OnPosRectChange.
  307.      * Therefore we do pretty much the same thing we do in that
  308.      * function although we ask the control for the size it wants.
  309.      */
  310.  
  311.     //Get the size from the control
  312.     if (NULL!=m_pTen->m_pIViewObject2)
  313.         {
  314.         hr=m_pTen->m_pIViewObject2->GetExtent(m_pTen->m_fe.dwAspect
  315.             , -1, NULL, &szl);
  316.         }
  317.  
  318.     if (FAILED(hr))
  319.         return hr;
  320.  
  321.     //Add these extents to the existing tenant position.
  322.     SetRect(&rcT, 0, 0, szl.cx*10, -szl.cy*10);
  323.     RectConvertMappings(&rcT, NULL, TRUE);
  324.  
  325.     rc=m_pTen->m_rcPos;
  326.     rc.right=rc.left+rcT.right;
  327.     rc.bottom=rc.top+rcT.bottom;
  328.  
  329.     m_pTen->UpdateInPlaceObjectRects(&rc, FALSE);
  330.     return NOERROR;
  331.     }
  332. //End CHAPTER24MOD
  333.