因为我最近也在搞一些RTF 之类的东东,刚好可以告诉你一个我认为最好的方法,你试试看.
在你的系统中找到一个叫RICHTX32.OCX 的OCX,一般在winnt/system32/下,然后安装此组件,
后就会生成RichTextBox,OLEObjects,OLEObject,三个控件,RichTextBox就是你所想要的了.
代码:
var
RE: TRichTextBox;
List: TStringList;
begin
Re:= TRichTexBox.Create(Self);
List:= TStringList.Create();
try
Re.parent:= self;
Re.visible := false;
Re.LoadFile(YourDocFile);
List.Text:= Re.TextRtf;
List.SavetoFile(YourRtfFile);
finally
Re.Free;
List.Free;
end;
end;
随手写的,没有调试,你看看吧,如果不行,请MAIL给我.
rain_alinn@163.net
