谁能给一个详细的在文字编辑器(例如richedit)中,插入图片的例子。(300分)

  • 主题发起人 主题发起人 zhm_good
  • 开始时间 开始时间
Z

zhm_good

Unregistered / Unconfirmed
GUEST, unregistred user!
谁能给一个详细的在文字编辑器(例如richedit)中,插入图片的例子。最好保存文件时,图片也能放在一起
进行保存。
经验证后,马上送上300分
 
在richedit中插入图片可以用RXLib里的RxRichedit控件,richedit本身很难实现。
http://www.csdn.net/cnshare/shtm/93.shtm有这个控件的下载

先添加Clipbrd单元。

procedure TForm1.Button1Click(Sender: TObject);
var
Pict :TPicture;
begin
with OpenPictureDialog1 do begin
if Execute then begin
Pict := TPicture.Create;
try
Pict.LoadFromFile(FileName);
Clipboard.Assign(Pict);
RxRichEdit1.PasteFromClipboard;
finally
Pict.Free;
end;
end;
end;
end;

 
对呀,那个控件很不错的呀。
 
建议用RxRichEdit控件,我是这样做的,和mlzhou差不多,不过我这个比较好调用:
uses Clipbrd;
procedure TMainForm.InsertImg(sFN: string; RxEdit: TRxRichEdit);
{插入图像到RXRICHEDIT中
sFN : 图像文件
RxEdit : 要插入图像文件的控件
}
var
Pict : TPicture;
begin
Pict := TPicture.Create;
try
Pict.LoadFromFile(sFN);
Clipboard.Assign(Pict);
RxEdit.PasteFromClipboard;
finally
Pict.Free;
end;
end;
 
RxRichEdit
rx带示例程序的
 
使用RXLib里的RxRichedit控件
 
才装好delphi5.0,因为这个控件好你只可以在5.0下安装。
在下好的控件包里,有一个RXCTL.pak 的文件,我双击这个文件,用delphi5.0打开它,
安装时,出现:"package d:/program files/borland/delphi5/projects/bpl/rxctl.bpl can't
be installed. Because it is ont a desing time package." 的出错的信息,怎么办呢?
真是急死人了!
Help!!!!!
 
如此安装:
将控件包安装到一个目录(默认就可以了),
然后解压补丁包和汉化包,
把里面的文件复制到你安装的目录,覆盖掉原来的文件;然后运行DELPHI5,
用File|Open打开RXCTL5.DPK,用Complie编译她,重复操作RXDB5.DPK和RXBDE5.DPK文件;
然后打开DCLRX5.DPK,Complie她再Install她,重复操作DCLRXDB5.DPK和DCLRXBD5.DPK文件,完成了!
最后如果用的时候说找不到什么什么.dcu文件,在程序搜索路径里加上你安装Rx控件包的Units目录就不会有问题了。
 
安装RxLib可以查阅其readme.txt文件,其中有说明安装方法:
1.编译三个.dpk文件(楼上所说的),将生成的.bpl文件拷到/windows/system目录下
2.再Install另外三个.Dpk文件(见楼上),先编译再安装
 
谢谢!很好呀。送分:linsb 100,wind2000 150,mlzhou 50.

本来准备每人送100分,wind2000比效照顾小弟,给了他150分。 ^_^
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部