如何将word文档转换成text?
现在我写个文档管理的程序,需要将word文档的文档内容提出来存为文本,请问哪位高手有办法. 问题点数：0、回复次数：4Top
1 楼ricetons（饭桶）回复于 2003-02-01 20:51:20 得分 0
可以用OLE Automation.
你先在word用宏录制将VBA代码录过来，再翻译成delphi就可以了。Top
2 楼okiknow（）回复于 2003-02-03 16:00:08 得分 0
其实用saves就可以了吧！把word文档另存为txt文件就可以了，
下面给个例子：
var
Test:Variant;
begin
Test:=CreateOleObject('Word.Application');
Test.Documents.Open('c:\Test.Doc');
Test.ActiveDocument.SaveAs('c:\Test.Txt',2);
Test.Quit;
end;
Top
3 楼grail_（grail_）回复于 2003-02-03 16:37:54 得分 0
用vba这个方法很好
就是怕慢了点
Top
4 楼ricetons（饭桶）回复于 2003-02-07 00:32:20 得分 0
不慢。Top
