微软embeded_word代码解析

微软embeded_word代码解析。

Microsoft Office办公套件以其功能强大、方便实用而被广泛使用。我们可以使用自动化作为Word用以把其功能显露给其他应用的方式,采用这种方式可以尽可能少的占用自动化客户的资源,并且不需要被访问对象的类型信息就可以进行调用。 
以下是创建这个MFC应用程序的步骤: 

(1)使用AppWizard创建一个新的MFC AppWizard(EXE)工程,命名为"Embed_Word" 

(2)选择单文档视图(SDI)结构,在第3步中需要选中Container,以提供容器支持。 其它都为默认。在ClassView中将产生如下类: 

应用类: CEmbed_WordApp in Embed_Word.h and Embed_Word.cpp 

框架类: CMainFrame in MainFrm.h and MainFrm.cpp 

文档类: CEmbed_WordDoc in Embed_WordDoc.h and Embed_WordDoc.cpp 

视图类: CEmbed_WordView in Embed_WordView.h and Embed_WordView.cpp 

容器类: CEmbed_WordCntrItem in CntrItem.h and CntrItem.cpp 

(3)在View菜单中,选ClassWizard,选Automation选项卡,选Add Class,选择From a TypeLibrary, 在Office目录中选中Microsoft Word 97/2000 类型库Word8.olb或Word9.olb,会将把类型库中的所有类添加到你的工程中。这时,ClassView中会多出几十个类,可以通过这些类提供的接口来实现必要的功能。 
(4)在CCntrItem.h中添加获取标准COM接口IDispach的函数: 
LPDISPATCH GetIDispatch(); 其函数实现如下: 

LPDISPATCH CEmbed_WordCntrItem::GetIDispatch() 

{ 

      ASSERT_VALID(this); 

      ASSERT(m_lpObject != NULL); 

      LPUNKNOWN lpUnk = m_lpObject; 

      Run(); 

      LPOLELINK lpOleLink = NULL; 

      if(m_lpObject->QueryInterface(IID_IOleLink,(LPVOID FAR*)&lpOleLink)== NOERROR){ 

           ASSERT(lpOleLink != NULL); 

           lpUnk = NULL; 

           if(lpOleLink->GetBoundSource(&lpUnk) != NOERROR){ 

                 TRACE0("Warning: Link is not connected!\n"); 

                 lpOleLink->Release(); 

           } 

           ASSERT(lpUnk != NULL); 

      } 

      LPDISPATCH lpDispatch = NULL; 

      if(lpUnk->QueryInterface(IID_IDispatch,(LPVOID FAR*)&lpDispatch) != NOERROR){ 

           TRACE0("Waring: does not support IDispatch!\n"); 

           return NULL; 

      } 

      ASSERT(lpDispatch != NULL); 

      return lpDispatch; 

} 

 



通过此函数来返回标准COM接口IDispatch。 
(5)在Embed_WordView.cpp中添加对"MSWord8.h"的引用:#include "MSWord8.h",如使用Word2000,则包含对"MSWord9.h"的引用。 然后在视类CEmbed_WordView中添加函数EmbedAutomateExcel(): 

void CEmbed_WordView::EmbedAutomateWord() 

{ 

      BeginWaitCursor(); 

      CEmbed_WordCntrItem* pItem = NULL; 

      TRY{ 

            CEmbed_WordDoc* pDoc = GetDocument(); 

            ASSERT_VALID(pDoc); 

            pItem = new CEmbed_WordCntrItem(pDoc); 

            ASSERT_VALID(pItem); 

            GetClientRect(&pItem->rect); 

            CLSID clsid; 

            if(FAILED(::CLSIDFromProgID(L"Word.document",&clsid))) 

            AfxThrowMemoryException(); 

            if(!pItem->CreateNewItem(clsid)) 

            AfxThrowMemoryException(); 

            ASSERT_VALID(pItem); 

            pItem->DoVerb(OLEIVERB_SHOW, this); 

            m_pSelection = pItem; 

            pDoc->UpdateAllViews(NULL); 

            LPDISPATCH lpDisp; 

            lpDisp = pItem->GetIDispatch(); 

      } 



      CATCH(CException, e){ 

            if (pItem != NULL){ 

                   ASSERT_VALID(pItem); 

                   pItem->Delete(); 

            } 

            AfxMessageBox(IDP_FAILED_TO_CREATE); 

      } 

      END_CATCH 

      EndWaitCursor(); 

} 

 


如果仔细研究过这段代码,会发现它同AppWizard自动生成的OnInsertObject()函数有着惊人的相似程度,看一下View类中的 OnInsertObject() 方法,对其中的注释引起了我们的兴趣,因为它和我们刚写的方法有惊人的相似。事实上,我们刚才写的只不过是OnInsertObject()的一个特例:OnInsertObject()允许用户从可用的OLE对象列表中选择其一插入到应用程序中。因为在此我们只需对Word进行自动化,所以派生了这一行为。 

(6)为了在程序刚启动时便将Word嵌入到程序中来,还需在视类的OnInitialUpdate()函数中添加代码: 

void CEmbed_WordView::OnInitialUpdate() 

{ 

        CView::OnInitialUpdate(); 

        EmbedAutomateWord(); //将Word嵌入 

        m_pSelection = NULL; 

} 

 


(7)为了使嵌入的工作区占满整个客户区可以通过修改OnDraw函数来实现: 

void CEmbed_WordView::OnDraw(CDC* pDC) 

{ 

      CEmbed_WordDoc* pDoc = GetDocument(); 

      ASSERT_VALID(pDoc); 

      if (m_pSelection == NULL){ 

          POSITION pos = pDoc->GetStartPosition(); 

          m_pSelection = (CEmbed_WordCntrItem*)pDoc->GetNextClientItem(pos); 

      } 

      if (m_pSelection != NULL){ 

          CRect rect; 

          GetClientRect(&m_pSelection->rect); 

          m_pSelection->OnGetItemPosition(rect); 

          m_pSelection->Draw(pDC,rect); 

      } 

} 

 



三、编译执行 


编译执行该程序,当程序启动时便会试图启动Word自动化服务,这时鼠标会处于等待状态,当鼠标恢复正常状态时,Word以经被嵌入到了程序中来,工具条和菜单上会多出许多Word上的工具条和菜单,并可以使用Word的这些功能来为我们服务。 

你可能感兴趣的:(EMBED)