霖 霖霖 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-10 #1 用Delphi调用Word打开文档后，怎么通过编程控制的方式把打开的文档内容另存为BMP格式的图像文件，即Word文档中的每一页都另存为一个BMP文件？？？？
A app2001 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-10 #3 不要急，参考一下人家的贴子吧 http://www.delphibbs.com/delphibbs/dispq.asp?lid=1855318
L Lonestar Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-19 #4 试试下面的代码： if OpenDialog1.Execute then begin WordApp := CreateOleObject('Word.Application'); WordApp.Documents.Open(FileName:=OpenDialog1.FileName, ReadOnly:=True); WordApp.ActiveDocument.Content.Select; WordApp.ActiveDocument.Range.CopyAsPicture; WordApp.Quit; Image1.Picture.Assign(Clipboard); end; 没问题的！
试试下面的代码： if OpenDialog1.Execute then begin WordApp := CreateOleObject('Word.Application'); WordApp.Documents.Open(FileName:=OpenDialog1.FileName, ReadOnly:=True); WordApp.ActiveDocument.Content.Select; WordApp.ActiveDocument.Range.CopyAsPicture; WordApp.Quit; Image1.Picture.Assign(Clipboard); end; 没问题的！
L lhc4000 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-19 #5 Lonestar的方法很好用,但似乎只能保存第一页哦.
霖 霖霖 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-20 #6 Lonestar提供的方法果然好用！！！！！！！！！！ 实在太感激Lonestar了！！！！！！！！！！！！！ Good! Very Good! Yes!
