Windows编程

开发平台：
Visual C++

SMHOLE.C：源码内容
							/*
 *  S M H O L E . C
 *
 *  Sample mail handling hook OLE storage support for RICHEDIT
 *  Copyright 1992-95 Microsoft Corporation.  All Rights Reserved.
 */
#include "_pch.h"
DEFINE_OLEGUID(IID_IRichEditOleCallback, 0x00020D03, 0, 0);
const REOC_Vtbl vtblREOC =
{
    REOC_QueryInterface,
    REOC_AddRef,
    REOC_Release,
    REOC_GetNewStorage,
    REOC_GetInPlaceContext,
    REOC_ShowContainerUI,
    REOC_QueryInsertObject,
    REOC_DeleteObject,
    REOC_QueryAcceptData,
    REOC_ContextSensitiveHelp,
    REOC_GetClipboardData,
    REOC_GetDragDropEffect,
    REOC_GetContextMenu
};
/*
 *  SMH Object Methods
 *
 *  SMH_QueryInterface      (See OLE IUnknown object methods)
 *  SMH_AddRef              (See OLE IUnknown object methods)
 *  SMH_Release             (See OLE IUnknown object methods)
 *  SMH_InboundMsgHook      Filters inbound messages
 *  SMH_OutboundMsgHook     Filters sent mail messages
 *
 */
STDMETHODIMP
REOC_QueryInterface (LPREOC lpreoc, REFIID lpiid, LPVOID FAR * lppv)
{
    if (!memcmp (lpiid, &IID_IRichEditOleCallback, sizeof(IID)) ||
        !memcmp (lpiid, &IID_IUnknown, sizeof(IID)))
    {
        *lppv = (LPVOID)lpreoc;
        lpreoc->lcInit++;
        return hrSuccess;
    }
    DebugTraceSc (SMH_QueryInterface(), MAPI_E_INTERFACE_NOT_SUPPORTED);
    return ResultFromScode (MAPI_E_INTERFACE_NOT_SUPPORTED);
}
STDMETHODIMP_(ULONG)
REOC_AddRef (LPREOC lpreoc)
{
    return ++lpreoc->lcInit;
}
STDMETHODIMP_(ULONG)
REOC_Release (LPREOC lpreoc)
{
    if (--lpreoc->lcInit)
        return lpreoc->lcInit;
    UlRelease (lpreoc->lpstg);
    (*lpreoc->lpfnFree) (lpreoc);
    return 0;
}
STDMETHODIMP
REOC_GetNewStorage (LPREOC lpreoc, LPSTORAGE FAR * lppstg)
{
    HRESULT hr = hrSuccess;
    LPSTORAGE lpstg = lpreoc->lpstg;
#ifdef  _WIN32
    WCHAR rgch[MAX_PATH];
    wsprintfW (rgch, L"SMHOBJ%08ld", lpreoc->cSub++);
#else
    CHAR rgch[MAX_PATH];
    wsprintf (rgch, "SMHOBJ%08ld", lpreoc->cSub++);
#endif  // WIN16
    if (lpstg)
    {
        lpstg->lpVtbl->CreateStorage (lpstg,
                            rgch,
                            STGM_READWRITE | STGM_TRANSACTED | STGM_SHARE_EXCLUSIVE,
                            0,
                            0,
                            lppstg);
        if (HR_FAILED (hr))
            *lppstg = NULL;
    }
    DebugTraceResult (REOC_GetNewStorage(), hr);
    return hr;
}
STDMETHODIMP
REOC_GetInPlaceContext (LPREOC lpreoc,
   LPOLEINPLACEFRAME FAR * lppipframe,
   LPOLEINPLACEUIWINDOW FAR * lppipuiDoc,
   LPOLEINPLACEFRAMEINFO lpipfinfo)
{
    return ResultFromScode (E_NOTIMPL);
}
STDMETHODIMP
REOC_ShowContainerUI (LPREOC lpreoc, BOOL fShow)
{
    return ResultFromScode (E_NOTIMPL);
}
STDMETHODIMP
REOC_QueryInsertObject (LPREOC lpreoc, LPCLSID pclsid, LPSTORAGE pstg, LONG cp)
{
    return hrSuccess;
}
STDMETHODIMP
REOC_DeleteObject (LPREOC lpreoc, LPOLEOBJECT lpoleobj)
{
    return hrSuccess;
}
STDMETHODIMP
REOC_QueryAcceptData (LPREOC lpreoc,
    LPDATAOBJECT lpdataobj,
    CLIPFORMAT FAR * lpcfFormat,
    DWORD reco,
    BOOL fReally,
    HGLOBAL hMetaPict)
{
    return hrSuccess;
}
STDMETHODIMP
REOC_ContextSensitiveHelp (LPREOC lpreoc, BOOL fEnterMode)
{
    return hrSuccess;
}
STDMETHODIMP
REOC_GetClipboardData (LPREOC lpreoc,
    CHARRANGE FAR * lpchrg,
    DWORD reco,
    LPDATAOBJECT FAR * lppdataobj)
{
    return ResultFromScode (E_NOTIMPL);
}
STDMETHODIMP
REOC_GetDragDropEffect (LPREOC lpreoc,
    BOOL fDrag,
    DWORD grfKeyState,
    LPDWORD lpdwEffect)
{
    return ResultFromScode (E_NOTIMPL);
}
STDMETHODIMP
REOC_GetContextMenu (LPREOC lpreoc,
    WORD seltype,
    LPOLEOBJECT lpoleobj,
    CHARRANGE FAR * lpchrg,
    HMENU FAR * lphmenu)
{
    if (lpreoc->lpfb && (*lphmenu = CreatePopupMenu()))
    {
        AppendMenu (*lphmenu, MF_ENABLED | MF_STRING, ID_Bullet, "Bullet Paragraph");
        AppendMenu (*lphmenu, MF_SEPARATOR, 0, NULL);
        AppendMenu (*lphmenu, MF_ENABLED | MF_STRING, ID_Indent, "Increase Indent");
        AppendMenu (*lphmenu, MF_ENABLED | MF_STRING, ID_Collapse, "Decrease Indent");
        AppendMenu (*lphmenu, MF_SEPARATOR, 0, NULL);
        AppendMenu (*lphmenu, MF_ENABLED | MF_STRING, ID_Left, "Align Left");
        AppendMenu (*lphmenu, MF_ENABLED | MF_STRING, ID_Center, "Align Center");
        AppendMenu (*lphmenu, MF_ENABLED | MF_STRING, ID_Right, "Align Right");
        if (lpreoc->lpfb->pf.wNumbering == PFN_BULLET)
            CheckMenuItem (*lphmenu, ID_Bullet, MF_BYCOMMAND | MF_CHECKED);
        if (lpreoc->lpfb->pf.dxStartIndent > 1440)
            EnableMenuItem (*lphmenu, ID_Indent, MF_BYCOMMAND | MF_DISABLED | MF_GRAYED);
        if (!lpreoc->lpfb->pf.dxStartIndent)
            EnableMenuItem (*lphmenu, ID_Collapse, MF_BYCOMMAND | MF_DISABLED | MF_GRAYED);
        return hrSuccess;
    }
    return ResultFromScode (E_NOTIMPL);
}
STDMETHODIMP_(SCODE)
ScNewRicheditCallback (LPFORMATBAR lpfb,
    LPALLOCATEBUFFER lpfnAlloc,
    LPALLOCATEMORE lpfnAllocMore,
    LPFREEBUFFER lpfnFree,
    LPREOC FAR * lppreoc)
{
    SCODE sc;
    LPREOC lpreoc = NULL;
    if (!FAILED (sc = (*lpfnAlloc) (sizeof(REOC), &lpreoc)))
    {
        memset (lpreoc, 0, sizeof (REOC));
        lpreoc->lpVtbl = (REOC_Vtbl FAR *)&vtblREOC;
        lpreoc->lcInit = 1;
        lpreoc->cSub = 0;
        lpreoc->lpfnAlloc = lpfnAlloc;
        lpreoc->lpfnAllocMore = lpfnAllocMore;
        lpreoc->lpfnFree = lpfnFree;
        lpreoc->lpfb = lpfb;
        sc = GetScode (StgCreateDocfile (NULL,
                                STGM_READWRITE           |
                                    STGM_TRANSACTED      |
                                    STGM_DELETEONRELEASE |
                                    STGM_SHARE_EXCLUSIVE,
                                0,
                                &lpreoc->lpstg));
        if (FAILED (sc))
        {
            (*lpfnFree) (lpreoc);
            lpreoc = NULL;
        }
    }
    *lppreoc = lpreoc;
    DebugTraceSc (ScNewRicheditCallback(), sc);
    return sc;
}

						