300-----RTF的显示和合并(300分)

  • 主题发起人 主题发起人 caowei
  • 开始时间 开始时间
C

caowei

Unregistered / Unconfirmed
GUEST, unregistred user!
delphi里面的RichEdit只能显示RTF文件里面的文字,不能显示图片。
有没有能够显示完整的RTF的控件(RxLib太大了.....)?
另外,怎么用程序把两个RTF合并?
 
用第三方控件吧.
 
这个问题我问过了,Pipi给了我很好的回答源码如下:
function link2(s1,s2:string):string;
var
p:integer;
begin
p:=LastDelimiter('}',s1);
if p>0 then
s1:=copy(s1,1,p-1)
else
s1:='{'+s1;
p:=Pos('{',s2);
if p>0 then
Delete(s2,1,p)
else
s2:=s2+'}';
result:=s1+s2;
end;

调用的时候
s1:=rtf1;
s2:=rtf2;
对了控件你可以用VB的Richtx32.ocx可以显示图片而且使用很简单
 
www.51delphi.com就有你要的控件.
 
既然是我的,分数给一部分给我:)
 
SynEdiAfte控件不错,可以很方便地插入图片的。
 
多人接受答案了。
 
to fanren945
请问你用过VB的Richtx32.ocx吗?如何安装?与RichEdit相比,有什么好处?
方便的话,请mail我一个:oldice@163.net
为了表示我的谢意,我可以送你100分。
 
后退
顶部