急~~~请问怎么在memo中实现插入图片的问题!在线等

Question

procedure TForm3.Z3Click(Sender: TObject);
var
currintfile:string;
begin
if  openpicturedialog1.execute then
begin
currintfile:=openpicturedialog1.filename;
image1.Picture.LoadFromFile(currintfile);
 
end;
end;请问怎样修改才能实现在memo中插入图片的功能?

Answer 1

Memo太弱了,找个支持插图片的控件。
或者换成TRichEdit，已经有实现例子

Answer 2

同意楼上的,
如果是要做背景,用image就可以了.

Answer 3

这个rzrichedit控件可以插入图片吗?还有,这个控件中的文字可以改变它的方向吗?比如:垂直,水平方向的.