Ole的打印问题， 请大侠赐教!!

我在Delphi程序里嵌入了一个Ole对象的Word文档， 想直接通过Delphi把这个嵌入的Word文档打印出来， 我该怎么做？我最多只能给到100分了， 不好意思！！

解决方案 »

  1.   

    .使用CreateOleObject将启动Word，然后以Ole方式对Word进行控制。本办法是使用以CreateOleObjects方式调用Word，实际上还是Ole，但是这种方式能够真正做到完全控制Word文件，能够使用Word的所有属性，包括自己编写的VBA宏代码。与Servers控件和com技术相比，本方法能够真正地使用Word的各种属性，和在VBA中编写自己的代码基本一样，可以缺省的代码也不需要使用。
    本方式启动的Word与Delphi程序分属两个窗体。缺点是使用本方法没有Delphi代码提示，所有异常处理均需要自己编写，可能编写时探索性知识比较多。三、Word宏编辑器
    Word能够真正地进行VBA代码的编辑，可以编写窗体、函数。进入Word宏编辑器的方法：工具->宏->Visual Basic编辑器，可进入Visual Basic编辑器界面。Word的Visual Basic编辑器界面和真正的Visual Basic编辑器基本相同，在此不再向详述。在VBA代码中，可以添加用户窗体、模块、类模块。用户窗体、模块、类模块的概念和Visual Basic完全相同。注释也与Visual Basic完全相同。可以将光标停留在窗体、模块的任何一个子程序上，直接按“F5”运行当前子程序。四、Word的宏的概述
    Word充分地将文档编辑和VB结合起来，真正地实现文档的自动化。使用Word编程，类似于使用Visual Basic，所不同的是，在Word中，能够直接运行某一个子程序，直接看见结果，Word的宏，只能解释运行，而Visual Basic，现在已经能够编写成真正的机器码，从代码的保护上来说，应该尽可能地减少Word的VBA代码数量，尤其是关键的代码。
    VBA宏，可分成四种：
    １、 和命令名相同的宏
    如FileSave，FileOpen，如果在VBA代码中包含与Word同名的函数，则直接执行这些VBA代码，忽略Word本身的命令。
    ２、 Word内特定的宏
    这些宏包含AutoExec（启动 Word 或加载全局模板）、AutoNew（每次新建文档时）、AutoOpen（每次打开已有文档时）、AutoClose（每次关闭文档时），AutoExit（退出 Word 或卸载全局模板时）。如果VBA代码中含有这些名称的函数，则满足相应的条件，相应代码就自动执行。
    ３、 相应事件的VBA宏
    这些宏是由事件触发的宏，如Document_Close在文档关闭的时候触发事件，Document_New在新建文档的时候触发，Document_Open在打开文档的时候触发。
    ４、 独立的宏
    自己编写的VBA代码，即不属于上面几种情况的VBA代码，可以被其他VBA代码调用，更重要的是，可以被其他程序调用。这样，我们就可以屏弃Word自动执行的宏，通过Delphi直接调用相应宏来达到目的。
    五、Word命令宏的详细描述
    Word本身的命令函数包含很多，但是无论是word联机帮助还是MSDN帮助，都没有这方面的介绍，因此只能凭自己的实验取探索，初步探测的函数如下：
    宏名 解释 注释
    FileNew 新建 
    FileNewDefault 新建空白文档 
    FileSaveAs 另存为 
    FileOpen 打开 
    FileClose 关闭 
    FilePrint 打印 
    FilePrintPreview 打印预览 
    ToolsCustomize 工具栏里面的自定义 
    ToolsOptions 工具选项 
    ToolsRevisions 突出显示修订 
    ToolsReviewRevisions 接受或拒绝修订 
    ToolsRevisionMarksAccept 接受修订 
    ToolsRevisionMarksReject 拒绝修订 
    ToolsRevisionMarksToggle 修订 
    ToolsMacro 宏 
    ToolsRecordMacroToggle 录制新宏 
    ViewSecurity 安全性 
    ViewVBCode 查看VB编辑器环境 
    FileTemplates 模板和可加载项 
    ToolsProtectUnprotectDocument 解除对文档的保护 
    InsertHyperlink 插入超级链接 
    EditHyperlink 编辑超级链接 
    DeleteHyperlink 删除超级链接 
    EditLinks 查看、删除链接 
    EditPasteAsHyperlink 粘贴超级链接 
    FormatStyle 样式 
    EditBookMark 书签 
      

  2.   

    谢谢了， 这些信息很有用处。我可能没有说清楚， 我在程序里面使用了一个TOleContainer型的件， 然后在这个控件中嵌入了一个Word文档， 我想的是可以在Form上做一个按钮， 当按下这个按钮时， 可以自动的打印出这个嵌入的WORD文档的内容， 这个时候我跟本就不知到怎样才可以通过
    CreateOleObject的方式去启动WORD并打开这个嵌入的文档能不能指条明路