如何把dbgrid的数据导成word

zhjdelphi 2008-05-28 10:39:16
能给我详细过程吗?
...全文
73 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
rzxml 2008-05-28
  • 打赏
  • 举报
回复
用servers 中的word组件就可以了,
nb95463034 2008-05-28
  • 打赏
  • 举报
回复
是的,偶这里的应用都是EXCEL的

其实导成WORD没必要,生成个文本文档WORD打开

有些用户要求很BT,基本功能也要程序员做

当程序员是保姆,当他们自己是小孩啊
zhjdelphi 2008-05-28
  • 打赏
  • 举报
回复
网上都excel的代码啊

nb95463034 2008-05-28
  • 打赏
  • 举报
回复
具体代码倒是没有,建议楼主自己搜一下

偶搜了下,可能对你有帮助

OleWord时一些用用的代码  


一、Delphi程序启动Word
采用CreateOleObjects的方法来启动Word,调用VBA代码,具体实现过程为:
首先使用GetActiveOleObject('Word.Application')判断当前内存中是否存在Word程序,如果存在,
则直接连接,如果没有Word程序,则使用CreateOleObject('Word.Application')启动Word

二、Delphi程序新建Word文稿
格式:WordDocuments.Add(Template,NewTemplate,DocumentType,Visible)
Template: 使用模板的名称,
NewTemplate: 新建文档的类型,True表示为模板,False表示为文档
DocumentType: 文档类型,默认为空白文档
Visible: 打捞的窗口是否可见

举例:Doc_Handle:=Word_Ole.Documents.Add(Template:='C:\Temlate.dot',NewTemplate:=False);

三、Delphi程序打开Word文稿
格式:WordDocuments.Open(FileName,ConfirmConversions,ReadOnly,PassWordDocument,
PasswordTemplate,Revent,WritePasswordDocument,WritePassWordTemplate,
Format,Encoding,Visible)

FileName: 文档名(包含路径)
Confirmconversions: 是否显示文件转换对话框
ReadOnly: 是否以只读方式打开文档
AddToRecentFiles: 是否将文件添加到"文件"菜单底部的最近使用文件列表中
PassWordDocument: 打开此文档时所需要的密码
PasswordTemplate: 打开此模板时所需要的密码
Revert: 如果文档已经,是否重新打开文档
WritePasswordDocument: 保存对文档更改时所需要的密码
WritePasswordTemplate: 保存对模板进行更改时所需要的密码
Format: 打开文档时所需使用的文件转换器
Encoding: 所使用的文档代码页
Visible: 打开文档的窗口是否可见

举例:
Doc_Handle:=Word_Ole.Documents.open(FileName:=Doc_File,ReadOnly:=False,
AddToRecentFiles:=False);

studyrandy 2008-05-28
  • 打赏
  • 举报
回复
学习下,我最近也做了导出,不过是导到excel,word的不知道怎么搞,excel里还有坐标定位,怎么把网格里的数据贴到或赋值到word里,楼主要是解决了,贴出看下啊。
zhjdelphi 2008-05-28
  • 打赏
  • 举报
回复
excel的我有
还是要谢谢你
des2006 2008-05-28
  • 打赏
  • 举报
回复
呵呵,我的程序里,有dbgrid导成excel的代码

需要的话,可以贴给你

zhjdelphi 2008-05-28
  • 打赏
  • 举报
回复
能具体点吗?
最好给出代码

2,496

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧