我现在是这样做的
用一个DBRichEdit编辑(原配的不太好,支持OLE还要写代码,可以用Infopower的), 在DBRichEdit上Ole word
但好像速度……
所以可以真接用DBRichEdit的我都尽量不用Ole

解决方案 »

  1.   

        不够具体,请看懂了我的问题后再回答,谢谢!!!
        请给出支持OLE的DBRichedit的代码,谢谢!!!
      

  2.   

        请给出Infopower的详细解释,谢谢!!!
      

  3.   

        其实这些功能我都实现了,只不过是我不知道怎么判断Word文档是否关闭,以便在该文档关闭(即编辑完闭)时,自动将该文档内容导入库中。
      

  4.   

    别忘了给分!!!!在打开表时,在ole 对象中使用流将 使用字段流 TBlobStream的blob字段的东西导入ole对象中,编辑,修改。
    找到word 的窗口handle使用findwindow,用标题作为一个参数!
    一直循环,等word 关闭,返回空handle,不久可以判断word是死是活了吗!
    然后,在用流将ole对象李的内容到入字段流中,不久可以保存到数据库中了吗?
      

  5.   

       我很高兴,终于有人能回答我的问题了!!!!
       请给出具体解答,最好给出你编译通过的源程序,寄给我,[email protected],谢谢!!!
      

  6.   

      我非常感谢ruanwei,shaohua两位大侠给我回复!!!
      

  7.   

    关注此问题,pcxdg你得到解答后,能否给我一个例子,我在自己的程序中没有能实现这个
    功能,这次希望能升级这个功能,请你多多帮忙!!!
      

  8.   

    用OleContainer(TOleContainer)组件,再加ruanwei说的办法
      

  9.   

    请查看你的信箱,[email protected] ,我从程序中找了一点,希望对你有用
      

  10.   

    在uses 中加入:comobj;在程序中设置app:olevariant;变量使用如下语句打开word
      app:=createoleobject('word.application');
      ...  
      app.documents.add(...);
      ...      使用一下语句来检测app的关闭
      if varisempty(app) then 
        ...
      

  11.   

    如果只是Word,我建议你用WordApplication和Worddocument ,用OleContain时的好多Word功能不能使用,而且你也不能对这个Word内容进行编程,正好我现在也在做一个WORD 应用,是把数据从Word文档中取出来存到数据库,以后还是生成WORD文档。
      

  12.   

    如果只是检测关闭,可以这样:
    procedure MyDocClosePro;
    begin
      你和程序
    end;
    WordDocument.OnClose:=MyDocClosePro;
      

  13.   

        peihexian大侠,你好,我很高兴,你和我采用的是同样的方法,
    能否将你编译通过的源代码给我寄一份,问题解决,我一定给你加分,
    非常感谢!!!
      

  14.   

         welcome !!!
      

  15.   

        welcome !!! 
      

  16.   

       在此向peihexian,ruanwei,shaohua三位大侠表示感谢与歉意,问体解决,我一定给三位加分!!!
       欢迎大家回复,谢谢!!!
      

  17.   

    To pcxdg: 
      能否这样实现: 1.数据库中保存Doc文件名(\\Computer\Share\FileName.Doc)
                   2.用CreateProcess、WaitForObject...API来调用Word维护该文件
      (纯属馊主意, 请别见怪)
      

  18.   

        giq2000:
            你好!
            其实你的这种方案,我以前用过,有很多弊端。   
            不过,问题解决后,我还是会为你加分的 !!!
            谢谢你的回复!  欢迎大家回复,谢谢!!!
      

  19.   

        welcome !!! 
      

  20.   

    建议您访问www.etechbase.net/tech,里面有很多资料,也许可以解决您的问题。
    访问http://168.168.18.11:81/etechbase/advsearch.php将您的问题输入查询内容框,选择不同的精确程度,即可以找到你所需要的答案。效果还是可以的。
      

  21.   

        Thanks !!! 
      

  22.   

         welcome !!!  
      

  23.   

       www.etechbase.net/tech这个URL怎么上不了