WinForm预览Office文档

使用WinForm, WPF, Office组件

原理:使用Office COM组件将Word,Excel转换为XPS文档, 将WPF的DocumentViewer控件寄宿到WinForm中, 实现预览.

1. 新建WinForm项目

2. 新建WPF用户控件, 注意是WPF控件

3. 编辑WPF用户控件

VS设计预览显示效果如下:

如果不需要自带的工具栏, 可以添加以下资源隐藏工具栏:

4. 新建WinForm用户控件

在WinForm上添加ElementHost

将WPF用户控件添加到ElementHost上,设计器代码XpsPreviewer.Designer.cs如下

//ElementHost    private System.Windows.Forms.Integration.ElementHost elementHost1;    //XpsPreviewer变量    private WPF.XpsPreviewer xpsPreviewer1;    private void InitializeComponent()    {        this.elementHost1 = new System.Windows.Forms.Integration.ElementHost();        this.xpsPreviewer1 = new WPF.XpsPreviewer();        //初始化        //其他属性初始化...        this.elementHost1.Child = this.xpsPreviewer1;        //其他属性初始化...    }

在XpsPreviewer.cs后台代码中定义方法:

/// 
    /// 加载XPS文件    /// 
    /// XPS文件名    internal void LoadXps(string fileName)    {        var xpsDocument = new XpsDocument(fileName, FileAccess.Read);        this.xpsPreviewer1.documentViewer.Document = xpsDocument.GetFixedDocumentSequence();        xpsDocument.Close();    }

5. 将Excel(Word类似)转换为XPS文件

通过Nuget包管理控制台安装COM组件:

PM> Install-Package Microsoft.Office.Interop.Excel

转换为XPS:

/// 
    /// 将Excel文件转换为XPS文件    /// 
    /// Excel文件名    /// 转换的xps文件名    public void ConvertExcelToXps(string excelFileName, string xpsFileName)    {        if (string.IsNullOrWhiteSpace(excelFileName))            throw new ArgumentNullException(excelFileName);        if (string.IsNullOrWhiteSpace(xpsFileName))            throw new ArgumentNullException(xpsFileName);        var fileInfo = new FileInfo(xpsFileName);        if (!fileInfo.Directory.Exists)            fileInfo.Directory.Create();        //删除已存在的文件        if (File.Exists(xpsFileName))            File.Delete(xpsFileName);        Excel.Application app = new Excel.Application();        app.DisplayAlerts = false;        Excel.Workbooks wbs;        Excel.Workbook wb;        wbs = app.Workbooks;        wb = wbs.Add(excelFileName);        dynamic Nothing = System.Reflection.Missing.Value;        wb.ExportAsFixedFormat(Excel.XlFixedFormatType.xlTypeXPS, xpsFileName, Nothing, Nothing, Nothing, Nothing, Nothing, Nothing, Nothing);        wb.Close(true);        wbs.Close();        app.Quit();        KillExcelProcess(app);    }

扩展: 每次调用Excel打开文件,均会产生一个进程, 在网络上收集的释放Excel进程方式均不起作用. 因此选择直接结束进程, 根据Excel句柄结束进程, 而不是根据进程名称杀死全部正在运行的Excel.

[DllImport("User32.dll")]    private static extern int GetWindowThreadProcessId(IntPtr hWnd, out int ProcessId);    /// 
    /// 结束Excel进程    /// 
    ///     private void KillExcelProcess(Excel.Application app)    {        if (app == null)            return;        try        {            IntPtr intptr = new IntPtr(app.Hwnd);            int id;            GetWindowThreadProcessId(intptr, out id);            var p = Process.GetProcessById(id);            p.Kill();        }        catch { }    }

现在已经可以正常的预览Excel文件了. 由于Excel另存为XPS文件会耗费一定的时间, 因此建议在后台线程中提前异步生成, 在预览时可直接调取XPS文件.

补充: Word 转换为 PDF

Word.Application app = new Word.Application();    Word.Document document = null;    object missing = System.Reflection.Missing.Value;    app.Visible = false;    document = app.Documents.Open(sourcePath);    document.ExportAsFixedFormat(targetPath, Word.WdExportFormat.wdExportFormatPDF);    object saveChanges = Word.WdSaveOptions.wdDoNotSaveChanges;    document.Close(ref saveChanges, ref missing, ref missing);    ((Word._Application)app).Quit(ref missing, ref missing, ref missing);