1. 导入word文件
View ----ClassWizard-------Member Varibles----Add Class----From a type Library---C:\Program Files\Microsoft Office\Office12\MSWORD.OLB
2. 新建四个类
_Application
Documents
_Document
Range
3.
MFC中RichEdit控件为什么不显示
RichEdit控件需要在程序中加入OLE初始化,不是拿来就能用的,具体可以查看MSDN,在InitInstance中先用AfxInitRichEdit进行初始化.
void CXSWordDlg::OnOK()
{
// TODO: Add extra validation here
CFileDialog file(true,NULL,NULL,OFN_HIDEREADONLY|OFN_OVERWRITEPROMPT,"All Files(*.*)|*.*| |",AfxGetMainWnd());
if(file.DoModal()==IDOK)
{
strText=file.GetPathName();
m_edit.SetWindowText(strText);
}
//CDialog::OnOK();
}
显示按钮事件
void CXSWordDlg::OnButxs()
{
// TODO: Add your control notification handler code here
//word应用程序
_Application app;
//初始化连接
app.CreateDispatch("word.Application");
Documents doc;
CComVariant a (_T(strText)),b(false),c(0),d(true);
_Document doc1;
doc.AttachDispatch( app.GetDocuments());
doc1.AttachDispatch(doc.Add(&a,&b,&c,&d));
Range range;
//求出文档的所选区域
range = doc1.GetContent();//取出文件内容
CString str;
str = range.GetText();
m_rich.SetWindowText(str);
//关闭
app.Quit(&b,&c,&c);
//释放环境
app.ReleaseDispatch();
}