在Delphi中如何把数据库中的记录引到word中

原创 2004年02月17日 18:49:00
在Delphi中如何把数据库中的记录引到word中


编号:QA004684
建立日期: 2003年5月18日 最后修改日期:2003年5月20日
所属类别:

Delphi - Office开发
Delphi - 数据库

q.gifpq:
    我用的系统是win2000,delphi是6.0版本,word2000
    请教:在delphi中要把数据库中的记录引到word中,建成表格的形式,要在word中一页上并排显示两个表格,如何实现呢?

a.gif回答:

    我对这道题的回复是这样的:我处理过类似的问题,不过我是把数据倒到TXT里面。也是画成表格形式,不过我想是一样的。
    重要的是你把一个变量设为 TStrings 的类型
    如:
    var
     TXTstr:TStrings;
    begin
     TXTstr := TStringList.Create;
     TXTstr.Append('────────┬────┬─────┬─────┬─────'); //第0行
     TXTstr.Append('姓名 │'); //第一行
    
    .... //从数据库取值 到 TXTADO
     while not TXTADO.Eof do
     Begin
     TXTstr[1]:=TXTstr[1]+format('%8s',[TXTADO.FieldByName('XM').Asstring])+'│';
     TXTADO.next;
     end;
    主持人注:完成这个问题,需要两个步骤,一个是读出数据库中的数据,另一个是利用Automation技术控制Word完成排版并保存为Word文件或者打印。第一个步骤上面已经介绍了,第二个步骤请参考:QA003053 "用Delphi4.0直接控制Word97"
    
    seashell.gifloga的意见:
    如果是VB,则可以在WORD中打开录制宏,再手工添加数据库记录,VBA可自动写出代码。一孔之见仅供参考。
    
    links.gif相关问题:
    QA000836 "如何知道Excel97的命令集"
    QA001381 "如何在VB中控制Word和Excel"
    QA003819 "如何利用 OLE 向 Word 添加文本"

此问题由黄威回答。

如何用DELPHI实现把WORD、EXCEL和图片等存储到数据库中

 用image字段保存这些文档。     var         word_stream:   TMemoryStream;         filename:   string;   ...
  • lee576
  • lee576
  • 2008年02月22日 15:35
  • 3961

Delphi中的数据添加到Word模板的相应位置

Delphi中的数据添加到Word模板的相应位置 就跟将数据导入Excel一样,在运行Delphi程序时,点击预览按钮后,会打开一Word模板,且将数据填入此Word模板相应的位置,此Word模板为一...
  • mrwu9902
  • mrwu9902
  • 2010年03月30日 20:40
  • 882

从数据库导出数据到word、excel、.txt

转自http://martinyang2010.bokee.com/2598999.htmlusing System;using System.Data;using System.Drawing;us...
  • mengyao
  • mengyao
  • 2007年03月06日 13:20
  • 3144

Delphi 利用TStringList 构建简单数据库

Delphi 的数据库功能 很是强大。但是笔者使用中却面临着很多问题。其次开发一个小型数据库工程,也因为使用BDE 增加了文件的大小,和发布的难度。在笔者的使用途中发现了TStringList,的许多...
  • GsBaoge
  • GsBaoge
  • 2008年01月11日 14:24
  • 800

Delphi中AdoTable通过Locate方法快速定位记录

Delphi中AdoTable通过Locate方法快速定位记录
  • kunshan_shenbin
  • kunshan_shenbin
  • 2010年07月31日 19:47
  • 2418

delphi数据库数据显示

在delphi数据库数据显示中有两种常用方法:使用表(DBGrid)显示,使用报表(DBEdit)显示。在这里讲述报表的使用。 效果图 编辑视图 所需控件: 1. DataSource(...
  • MAO_JIN_DAO
  • MAO_JIN_DAO
  • 2016年06月02日 12:37
  • 473

Delphi与Word(三) 取得Word文件的数据

//取得Word文件的数据procedure getWordStr;var WordApp: TWordApplication;    WordDoc: TWordDocument;    DocIn...
  • TianGuanLeiOK
  • TianGuanLeiOK
  • 2004年09月08日 16:16
  • 1020

如何将 Memo中的文本内容保存到当前目录下的 Word 文档中

//在单元接口部分引用  Comobj ; procedure TForm1.Button3Click(Sender: TObject); var Word : Variant; begin ...
  • delphi308
  • delphi308
  • 2013年06月29日 12:45
  • 950

如何把数据库的内容写入到Word文档中

如何把数据库的内容写入到Word文档中?(陈勇)    huguangtao(原作)   关键字     数据库,Word,OLE     在编程时,由于Microsoft Word的编辑功能非常强大...
  • cbyhenan
  • cbyhenan
  • 2002年04月09日 08:50
  • 522

把数据库中的记录显示到下拉列表中

数据库连接if request.Form("user_name")user_name=request.Form("user_name")user_sex=request.form("user_sex"...
  • ie421
  • ie421
  • 2007年04月13日 13:56
  • 709
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:在Delphi中如何把数据库中的记录引到word中
举报原因:
原因补充:

(最多只允许输入30个字)