Z zhanglj99 Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-29 #1 Delphi5中用Twordapplication利用word打印 要求从数据库中读入图片,和字段
B bluefoam Unregistered / Unconfirmed GUEST, unregistred user! 2001-01-01 #2 可查看DELPHI自带的例子，基本可以满足你的要求了。
B bluefoam Unregistered / Unconfirmed GUEST, unregistred user! 2001-01-01 #3 当然，如果你不想让用户对生成的WORD文档做任何改动，即对用户不可见，只需使 Twordapplication.visible为FALSE，若自动关闭，关闭前注意先SAVEAS，否则会有 点小问题。 调用数据库字段时，也可以使用模板进行替换操作，这样好多字体格式，位置可以比较 方便的控制。代码如需要，可在以后附上。
当然，如果你不想让用户对生成的WORD文档做任何改动，即对用户不可见，只需使 Twordapplication.visible为FALSE，若自动关闭，关闭前注意先SAVEAS，否则会有 点小问题。 调用数据库字段时，也可以使用模板进行替换操作，这样好多字体格式，位置可以比较 方便的控制。代码如需要，可在以后附上。
不 不夜城 Unregistered / Unconfirmed GUEST, unregistred user! 2001-01-01 #4 我一向直接使用OLE的. 好处是不管是WORD还EXCEL/AUTOCAD等等,只要提供了OLE服务的第三方软件都可以.
J Jams Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-03 #7 to 郭玉梁 SendKey的算法如何，可否介绍一番？！
S sunhood Unregistered / Unconfirmed GUEST, unregistred user! 2001-03-22 #9 C:/Borland/Delphi5/Demos/Activex/Oleauto下有你要找的东西，呵呵。。 用不到SendKey 先用C:/Borland/Delphi5/Demos/Activex/Oleauto/word8中的方法得到图形和数据， 再用printout方法，直接打印即可，也不用保存，打印完关闭word用Close方法。 具体参数可以查阅宏。
C:/Borland/Delphi5/Demos/Activex/Oleauto下有你要找的东西，呵呵。。 用不到SendKey 先用C:/Borland/Delphi5/Demos/Activex/Oleauto/word8中的方法得到图形和数据， 再用printout方法，直接打印即可，也不用保存，打印完关闭word用Close方法。 具体参数可以查阅宏。
林 林沐 Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-21 #10 插入图片啊 wordapp:=CreateOLEObject('Word.Application'); WordApp.visible:=true; image1.Picture.LoadFromFile('d:/leon/rpt/1.bmp'); ClipBoard.Assign(image1.Picture.Bitmap); WordApp.Documents.Item(1).Bookmarks.Item('img1').range.paste;
插入图片啊 wordapp:=CreateOLEObject('Word.Application'); WordApp.visible:=true; image1.Picture.LoadFromFile('d:/leon/rpt/1.bmp'); ClipBoard.Assign(image1.Picture.Bitmap); WordApp.Documents.Item(1).Bookmarks.Item('img1').range.paste;
