DELPHI中如何将数据写到WORD文档，请给实例，多谢

DELPHI中如何将数据写到WORD文档，请给实例，多谢 问题点数：100、回复次数：8Top

1 楼zjs1982（delphi菜鸟）回复于 2002-09-09 16:48:42 得分 5

up一下Top

2 楼jshnet（JshNet）回复于 2002-09-09 18:17:47 得分 20

var  
      word:   variant;  
  begin  
        word:=createoleobject("word.application");  
        word.visible:=true;  
        word.documents.add();  
        with   query1   do  
        begin  
                while   not   eof   do  
                      word.selection.typetext(fieldbyanme('fiedname').asstring);  
       
                next  
        end;  
                   
   
   
  要么用流往里插，详细代码给分再说   。Top

3 楼njxdh（Wild Deer）回复于 2002-09-09 18:41:46 得分 30

delphi.demoTop

4 楼xjliang007（痛并快乐着）回复于 2002-09-09 18:56:14 得分 0

jshnet(泰山)   我试了一下，说[Error]   Unit1.pas(29):   Undeclared   identifier:   'createoleobject'，如何解决Top

5 楼xjliang007（痛并快乐着）回复于 2002-09-09 18:58:26 得分 0

分一定送Top

6 楼go_my_sky（凡石）回复于 2002-09-09 19:25:32 得分 20

加上  
  uses   comobjTop

7 楼gaojia（高佳）回复于 2002-09-09 20:55:17 得分 0

我觉得还是用Servers中的WordApplication和WordDocument好。  
   
      WordApp.Connect;  
      WordApp.WindowState:=wdWindowStateMaximize;   //设置窗口为最大  
      WordApp.Visible:=True;  
      WordDoc.ConnectTo(WordApp.Documents.Add(EmptyParam,EmptyParam,EmptyParam,EmptyParam));  
  Top

8 楼jshnet（JshNet）回复于 2002-09-09 22:54:44 得分 25

在uses   中加如COMOBJ单元就可以搞定了。Top

9 楼xjliang007（痛并快乐着）回复于 2002-09-10 09:01:43 得分 0

请教还有简单的方法吗Top

相关问题

• word
• wordapp
• emptyparam

• 帖主：xjliang007
• zjs1982
• jshnet
• njxdh
• go_my_sky
• jshnet

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载