W wallysw Unregistered / Unconfirmed GUEST, unregistred user! 2006-05-25 #1 各位大哥大姐，小弟想问一下，如何在Delphi中实现将一篇WORD文档的内容读到RichEdit中，小弟先谢谢了。 如果能附上关系代码，小弟不胜感激！ 在线等待！
Y yuzk2005 Unregistered / Unconfirmed GUEST, unregistred user! 2006-05-25 #2 先将wor文件丰为rtf格式文件 RichEdit1.Lines.LoadFromFile(rtf格式文件');
Y yuzk2005 Unregistered / Unconfirmed GUEST, unregistred user! 2006-05-25 #3 var docapp,wDoc: variant; s: string; begin docapp:=CreateOleObject('Word.Application'); wDoc := docapp.Documents.open('word文档'); s:='rtf文档'; wdoc.saveas(s,FileFormat:=wdFormatRTF); wdoc.close; RichEdit1.Lines.LoadFromFile(s); end;
var docapp,wDoc: variant; s: string; begin docapp:=CreateOleObject('Word.Application'); wDoc := docapp.Documents.open('word文档'); s:='rtf文档'; wdoc.saveas(s,FileFormat:=wdFormatRTF); wdoc.close; RichEdit1.Lines.LoadFromFile(s); end;
