如何把word文档，rtf文档导入到memo中。

Question

我的memo需要从word,rtf中直接导入文本，请问如何解决？

Answer 1

不明白？你是要导入RTF还是要导入DOC文档。RTF的话Delphi的例程里有.

Answer 2

下面用OLE方式导入文本，doc或rtf文件都可以导入。
uses ComObj;
procedure TForm1.Button1Click(Sender: TObject);
var myWord:Variant;
begin
  myWord := CreateOleObject('Word.Application');
  myWord.Visible := False;
  myWord.Documents.Open('d:\z.doc');
  myWord.Selection.WholeStory;
  myWord.Selection.Copy;
  myWord.Application.Quit(0);
  Memo1.Clear;
  Memo1.PasteFromClipboard;
end;

Answer 3

都UP干嘛，，呵呵
我想请问MEMO能插入WORD里的文章？？里面带格式的？？呵呵呵，，头一次听说，，

Answer 4

呵呵，我看死树的方法不错；估计就是文本COPY吧；